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EDITORIAL 
QE 


Très chers co-possesseurs de matériel HP, 


La nouvelle année commence avec cette nouvelle couverture bleue 
qui, j'espère, vous plaira. 


Vous remarquerez également une nouvelle présentation de l’intérieur 
de votre Journal favori. Les possibilités que nous offre la LaserJet 
sont enfin exploitées pleinement. Il n’est pas inutile de rappeler que 
ce Journal, comme ses prédécesseurs, est entièrement préparé et mis 
en page par un modeste HP-71B... 


Vous noterez aussi la naissance d’une rubrique dédiée au HP-75, que 
nous souhaitons la plus régulière possible. Merci à Eric Gengoux pour 
ses efforts dans ce sens. 


Mais le plus important est certainement l’arrivée du HP-28C, le 
nouveau calculateur de poche scientifique de Hewlett-Packard. Ce 
calculateur représente une nouvelle étape dans l’évolution des 
machines de poche, et nous lui avons consacré une place de choix 
dans nos colonnes. Il en vaut la peine ! 


Nous lui souhaitons un grand succès, et nous pensons qu’il figurera 
souvent dans nos colonnes. 


Mais je suis sûr que vous êtes impatient de voir votre JPC cuvée 


1987, et je me retire sur la pointe des pieds... 


Pierre David (37) 
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PPC PARIS SE REUNIT 
UNE FOIS PAR MOIS 


Comme vous le savez peut être déjà, PPC 
Paris se réunit une fois par mois, en plein 
coeur de Paris. Amenez votre matériel, votre 
bonne volonté et vos idées ! Plus vous en 
apporterez, et plus vous en trouverez chez vos 
collègues de PPC. 


Ces réunions se déroulent de manière très 
libre, aucun ordre du jour, discussion ou autre 
n'étant imposé. Un membre du bureau est 
toujours présent. Ainsi, si vous désirez 
remettre votre article tout frais au Journal, si 
vous avez des suggestions à faire, si vous 
voulez vous procurer des anciens numéros de 
JPC, ce sera en principe toujours possible. 


Si donc cela vous intéresse, n’hésitez plus un 
seul instant, venez nous rejoindre tous les 
premiers samedis de chaque mois (sauf en 
péride de vacances scolaires) au : 

Centre de Jeunesse et de Loisirs Jean Verdier 
11 rue de Lancry 

75010 Paris 

et en montant au deuxième étage, vous 
entendrez des éclats de rire et des discussions 


passionnées vers la salle 215. Attention, 
toutefois, de venir entre 16 et 19h. 
Pour l'accès en métro, trois possibilités 


s'offrent à vous : 

- Métro Strasbourg Saint Denis : 

Sortie porte St Martin / Bd St Denis, coté 
pairs 

- Métro République : 

Sortie Bd St Martin, coté pairs 

- Métro Jacques Bonsergent : 

Sortie Bd Magenta, coté impairs. 


Ah, j'oubliais ! JPC est (souvent) distribué en 
avant première lors de ces réunions. A bon 
entendeur, salut ! 


Les dates des prochaines réunions sont : 


Samedi 7 février 1987 
Samedi 7 mars 1987 
Samedi 4 avril 1987 
Samedi 16 mai 1987 
Samedi 6 juin 1987 


Pierre David (37) 


rt TEL FI FDES"E 


————_———— 


Alain Gillet 
Tél 43-67-54-44 (après 18h) 


Vend : 


Imprimante 82161A, plusieurs rouleaux de 
papiers: 2000F. Lecteur de code-barre: 500F. 
Livres Programmation synthétique (Dr. 
Wickes) : 60F, La programmation synthétique 
c'est facile (K. Jarret) : 60F, Time module 
solutions 1 (HP) : 60F, Au fond de la 41 
(Dodin) : 60F. 


J.P. Spitoni 

Ch M302, 61 av du président Wilson 

94230 Cachan 

Tél: 46 64 15 51 (Laisser message pour le 
M302) 


Vend : 
HP71B, lecteur de cartes, module Forth / 


Assembleur, module Analyse de circuits : le 
tout pour 6000F (Le HP71 doit partir !). 


François Duret-Lamouroux 
5 Chemin de la Tuilerie 
78240 Chambourcy 


Cherche : 


Un Translator Pac pour HP-71. 


Le Club dispose de plusieurs interfaces vidéo 
HP82163B neuves (dans leur boite, avec 
documentation). Elles sont cédées pour 600 F. 


Nous avons également en stock des lots de 100 
cartes magnétiques pour HP-41. 100 F le lot. 





DUR ET MOU 


P. David 
W. C. Wickes 


J. Taïllandier 


Le HP-28C 
Le HP-28C par son père 


Ragots, bruits et rumeurs 


13 


22 
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LE HP-28C 


Hewlett-Packard a annoncé le 5 janvier la 
sortie d’un nouveau calculateur : le HP-28C. 


Cette annonce, qui vient 6 mois après celle du 
HP-18C (Business Consultant), est un 
événement majeur : ce nouvel outil représente 
un pas gigantesque dans l'informatique de 
poche à vocation scientifique. 


Je vous invite à me suivre dans la découverte 
de cette merveilleuse machine. 


QUELQUES CHIFFRES 
Prix : 2300 F (environ) 


Mémoire utilisateur : 
1700 octets (environ) 


Système d’exploitation en mémoire morte : 
128 Ko (2 fois plus que le HP-71) 


PRESENTATION - ASPECT 


Si vous avez lu la présentation du HP-18C 
(Business Consultant) dans JPC 37, vous 
noterez bon nombre de similitudes. 


Le HP-28C se présente comme un petit 
calepin, de couleur noire, portant sur le dessus 
le logo de la marque en caractères argentés. Le 
dessous contient le numéro de série ainsi que 
quatre patins en caoutchouc. 


Ouvrons le calepin. Nous voyons alors quatre 
parties : 


- sur la face supérieure droite, un écran, 

- sur Ja face supérieure gauche, quelques 
inscriptions, 

- et enfin, en vis à vis dans les parties 
inférieures, deux claviers. 


L'écran (à cristaux liquides, comme :il se doit) 
affiche 4 lignes de 23 caractères, ou 32x137 
pixels. Comme sur le HP-18C, l'écran est 
remarquablement lisible, et le contraste est 
réglable. 


Les inscriptions rappellent les types d’objets 
manipulés par le HP-28C, et font office d’aide 
mémoire. 


Le clavier gauche est un clavier alphabétique 
(ordre  ABCDEF), comportant quelques 
symboles supplémentaires (parenthèse, crochet, 
accolade, etc.). 


Le clavier droit comprend le pavé numérique 
et les touches de fonction. Signalons la 
présence d’une large touche [ENTER], ainsi que 
de six touches blanches sans inscriptions 
gravées. 


Les touches sont bien disposées, et on s'y 
retrouve très vite avec un peu d’habitude. 


La tenue en main est bonne. Fermée, le 
HP-28C est aisément transportable. La solidité 
est correcte, on peut s’en servir pour planter 
des punaises (si, si, je vous assure !), bien que 
ce ne soit pas le principal usage. 


Ouvert sur un bureau, il est très agréable à 
manipuler. Les touches sont franches et bien 
espacées. La frappe peut être relativement 
rapide. 

Mais on ne se sert pas seulement du HP-28C 
sur un bureau je m'en suis servi en 
marchant, et je l’ai trouvé facile à manipuler. 


Signalons l'existence d’une imprimante 
thermique, la même que celle du HP-18C. La 
liaison se fait par infra-rouge. Je n’ai pas pu 
en disposer. 


CARACTERISTIQUES PRINCIPALES 


Comme le HP-18C, le HP-28C fonctionne par 
des menus, qui s'affichent sur la dernière 
ligne de l’écran, indiquant la signification des 
six touches blanches. 


Le HP-28C s'utilise comme une calculatrice 
notation polonaise inverse (RPN) classique, ou 
comme une calculatrice "à formule algébrique" 
(comme sur le HP-71, on entre la formule et 
on l’évalue ensuite). 


Le fonctionnement en RPN est le système que 
nous connaissons bien sur les calculateurs HP 
"classiques". Il est ici étendu la pile ne 
comporte plus 4 niveaux, mais autant que la 
mémoire le permet. 


L'utilisation est aidée par la visualisation des 
trois niveaux inférieurs de la pile. Les touches 
[VIEW] et [VIEW] permettent d’ailleurs de 
visualiser temporairement toute la pile. 





Pour utiliser des formules algébriques, il faut 
faire : 
15+3*6 [EVAL] 


La grande nouveauté est que la pile peut 
contenir différentes sortes d'objets. Cette idée 
avait été effleurée avec le HP-15 et 
l’utilisation de matrices dans la pile. Ici, le 
principe a été généralisé. Alors, pour fixer les 
idées, explicitons les différents objets : 


Nombres réels 
Ce sont les nombres "normaux". 
Ex: 1.6E-19 


Nombres complexes 

Ce sont des paires de nombres réels, entourés 
par des parenthèses et séparés par des virgules 
(resp. point) si le séparateur décimal est le 
point (resp. la virgule). 

Ex: (12.5,25.0) 


Nombres binaires 

Il s’agit de nombres exprimés dans la base 
courante (hexadécimale, décimale, octale ou 
binaire), précédés par un symbole ‘#. 

Ex: # 2E3FE 


Chaînes de caractères 

Elles sont formées par une suite de caractères 
entourée de guillemets. 

EX: "PPC-Paris" 


Vecteurs (réels ou complexes) 

Ce sont des suites de nombres 
complexes encadrées par des crochets. 
EX: 1(1,2).42,3}.(5,4)1 


réels ou 


Matrices (réelles ou complexes) 
On les représente par une suite de vecteurs 
(réels ou complexes) encadrée par des crochets 
(vecteurs de vecteurs). 
Ex: 

([1 0] 

[0 11] 


Listes 

C’est le genre “fourre-tout" du HP-28C. Les 
listes sont des objets réunissant en une seule 
entité, encadrée par des accolades, plusieurs 
objets hétéroclites. Cela peut s'avérer très 
utile. Par exemple, les paramètres d’un tracé 
de courbe sont dans une liste  ([IPPAR]) 
contenant, entre autres, le centre du tracé 
(deux coordonnées, donc nombre complexe) et 
la résolution (nombre réel). 

EX: €"HP-28C" [1 2 3] (1,2) 5) 





Noms, Expressions, Equations 

Nous verrons plus loin la distinction entre ces 
trois objets. Tous trois sont délimités par des 
apostrophes. 

Ex: :'ppc' SIN(X)=0? 


Programmes 

Eh oui, le HP-28C est programmable ! Et les 
programmes peuvent être mis dans la pile... 
Ex: « 1 1 ROT START 2 * NEXT » 


Continuons dans les nouveautés : ces objets 
sont manipulés par les mêmes fonctions. Par 
exemple, [ISIN] sert aussi bien pour les réels 
que pour les complexes. L'opérateur 1+1 sert, 
quant à lui, pour additionner des nombres 
réels, complexes, binaires, des matrices et des 
vecteurs ou pour concaténer des chaînes de 
caractères, mais encore pour additionner des 
expressions symboliques. Le principe est 
vraiment généralisé. 


Même des langages de haut niveau tels que 
Lisp ou Pascal n'arrivent pas à intégrer 
parfaitement ce concept. Seul APL banalise ses 
instructions, mais seulement pour les scalaires 
et les tableaux. La grosse informatique devrait 
s'inspirer de l’informatique de poche... 


Notons une aide, bien agréable. Le HP-28C 
referme les délimiteurs à notre place. Par 
exemple : 

{5 « 48 + CHR "AREUH [ENTER] 

sera Compris comme : 

{5 « 48 + CHR MAREUH" » } 

sans qu’il y ait besoin de fermer la chaîne, le 
programme, puis la liste. Faculté très utile ! 


Le HP-28C ne dispose pas de registres, comme 
un HP-41, mais stocke les informations dans 
des variables nommées. Par exemple, 
supposons que nous voulions créer la variable 
"TVA", et y stocker la valeur 18.6. Nous 
ferons : 

18.6 [ENTER] ‘TVA [STO] 

ce qui tout de même plus mnémotechnique... 


Le HP-28C est logique jusqu’au bout : les 
variables peuvent recevoir tous les objets cités 
ci-dessus. Ainsi, "TVA", après avoir reçu une 
valeur réelle, peut recevoir aussi bien une 
chaîne de caractères qu’une matrice complexe. 


Le HP-28C n'en finit plus de nous apporter 
des nouveautés. Les grincheux diront que ça 
existe depuis longtemps sur les gros systèmes, 
mais je trouve extraordinaire d’avoir 
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implémentée sur un calculateur tenant dans la 
poche la faculté d’annuler la dernière 
opération. Un simple appui sur la touche 
[UNDO], et le HP-28C revient dans l’état avant 
la dernière opération. Par exemple, supposons 
que vous vouliez soustraire et non additionner 
les deux matrices qui sont dans la pile. tUunDo1, 
et vous retrouvez vos deux matrices. Il ne 
reste plus qu’à les soustraire normalement. 


Moins nouvelle est la pile de commandes, bien 
connue des possesseurs de HP-71B. Les quatre 
dernières commandes sont mémorisées évitant 
ainsi des frappes inutiles. 


LE SYSTEME DE MENUS 


Prenons un exemple simple. Supposons que 
nous voulions calculer arcsin(1). Logiquement, 
nous devrions taper : 

[1] CENTER] [A] [S] [1] [IN] CENTER] 

pour voir s'afficher (selon le mode radians ou 
degrés) 1.57079... ou 90. 


Si cette méthode marche, il est bien évident 
que ce n’est pas la meilleure. Vous vous en 
doutez, il y a plus simple : 

[1] CENTER] la donnée 

[TRIG] activation du menu Trigonométrique 
[ASIN] deuxième touche blanche 


Il y a 310 fonctions et commandes dans le 
HP-28C. Toutes (sauf une) sont accessibles par 
des menus. Dans les menus, les six touches 
supérieures (blanches) sont redéfinies et la 
signification s'affiche en lettres blanches sur 
fond noir sur la dernière ligne de l’écran. Les 
menus contiennent généralement plus de six 
fonctions. On peut les faire défiler en 
appuyant sur les touches [INEXT] OU [PREVI. 


Les manipulations de la pile 


Le menu rsrAck] redéfinit les six touches 
blanches pour accéder à des fonctions de 
manipulation de la pile dont les noms sont très 
inspirés de Forth ([DUP], [OVER], PICK] etc.). A 
noter que les commandes les plus 
fréquemment utilisées ne sont pas dans le 
menu, mais directement sur le clavier. Ainsi, 
la touche tprop] est située juste à droite de la 
touche [IEEX] (exposant). 





Les fonctions de réels 


Le menu  [IREAL] présente les fonctions 
classiques sur les nombres réels (par opposition 
aux nombres complexes). Depuis [FACT] jusqu’à 
[MANT] (affichage de la mantisse), en passant 
par tMoo] et les diverses parties entières ([IIP], 
[FLOOR]..), tout est là. 


La trigonométrie 


Le menu [ITRIG] donne accès aux fonctions 
circulaires et à leurs inverses, aux conversions 
rectangulaire / polaire, complexe / réel, 
degrés  /  radians, et aux fonctions 
sexagésimales (HMS+ et compagnie). Notons 
que les conversions de complexe en réel (et 
inverse) fonctionnent également sur les 
matrices et vecteurs. 


Les logarithmes 


Le menu ftLocsy comprend les logarithmes 
(naturels et en base 10), et leurs inverses, 
In(1+x) et e*-], ainsi que les fonctions 
hyperboliques et inverses. | 


Les nombres complexes 
Le menu [CMPLX] permet les conversions 


complexe / réel, polaire / rectangulaire 
(comme dans le menu fITRIG]. En une seule 


touche, on peut aussi extraire la partie 
imaginaire ou réelle, obtenir le conjugué et le 
vecteur unité dans Ja direction x+iy. 


Disponibles aussi sont la valeur absolue et le 


changement de signe (identique à la touche 
[CHS]). 


Les statistiques 


Les données statistiques sont rangées dans une 
matrice nxm, contenant les n valeurs des m 
variables. Toutes les données sont mémorisées, 
comme sur le HP-18C. Une matrice contient 
toutes les valeurs introduites. Chaque point est 
donc modifiable, ce qui procure une plus 
grande aisance dans ces manipulations. Une 
fois les points entrés, on peut sélectionner un 
couple de variables, et les utiliser pour les 
opérations classiques de corrélation, de 
covariance et de régression linéaire. D’autre 
part, le HP-28C connait les lois normale, du 
chi-2, de Snedecor et de Student. Avis aux 
connaisseurs. 





Les tableaux 


Le menu [LARRAY] ouvre les 
manipulation des tableaux. 

Le HP-28C appelle tableau une matrice ou un 
vecteur réel ou complexe. Comme nous l’avons 
déjà vu, la plupart des opérations (du moins 
celles qui ont un sens) s’appliquent de la 
même manière sur les tableaux et sur les 
nombres réels ou complexes. Ainsi, l’addition 
de matrices se fait par la simple pression de la 
touche t+1. De même, l’inversion se fait par 
[1/x]. Plus généralement, Ia transformation 
d’une matrice complexe en deux matrices 
réelles (M=P+iQ) se fait simplement en 
utilisant [C->R]. Ce menu présente deux 
catégories de fonctions : 


portes de la 


- les fonctions mathématiques. Ainsi, on peut 
calculer une transposée de matrice, créer une 
matrice identité ou une matrice dont tous les 
éléments ont la même valeur. On peut aussi 
calculer les produits vectoriel et scalaire, le 
déterminant, les principales normes, ainsi que 
les fonctions de conversions entre complexe et 
réel. Ces fonctions se retrouvent généralement 
dans le module Maths du HP-71, pour ceux 
qui connaissent. 


- les fonctions de manipulation de tableau. En 
bref, on peut décomposer un tableau (matrice 
ou vecteur) en simples nombres dans la pile. 
Par exemple : 

[IS 6 7] [8 9 10]] [ARRY->] 

renvoie les nombres 5 à 10 dans la pile, ainsi 
que la liste {2 3}, indiquant la dimension du 
tableau (2 lignes, 3 colonnes). 

Inversement, on peut recomposer le tableau 
par la fonction t->ARRY]. Les autres commandes 
permettent encore d’extraire un élément 
quelconque (IGET] ou IGETI]), ou de forcer un 
élément à une valeur donnée ([IPUT] ou IPUTI]). 


Juste un regret à propos des tableaux et de 
leur introduction au clavier j'aurais bien 
aimé pouvoir introduire simplement un 
élément calculé. Par exemple (1+SQRT(5))/2. 
J'aurais bien aimé pouvoir faire : 

[ 1 2 (1+SQRT(5))/2 [ENTER] 

A moins que quelque chose m'’ait échappé, je 
n’ai vu d'autre moyen que le recours à [IPUT] 
pour forcer la valeur de l’élément en question. 


Les listes 
Nous n'avons là que des fonctions de 


manipulation de listes, très comparables à leurs 
homolgues sur les tableaux. 





Les chaînes de caractères 


Les chaînes de caractères ont pour but 
l'affichage en clair des résultats par des 
programmes. On ne peut donc s'attendre à un 
jeu très élaboré de fonctions de chaînes. Il y a 
cependant les classiques [CHR], [NUM], [POS], [SUB] 
et SIZE]. (bISP] affiche une chaîne sur la ligne 
de l'écran donnée. [->STRI et  ISTR->] 
transforment un nombre en chaîne, et 
inversement. 


Les nombres binaires 


Le HP-28C rejoint là le HP-16C. Il peut 
calculer dans les quatres bases de 
l’informaticien. La taille des mots peut varier 
de 1 à 64 bits, selon tstus] (SeT Word Size). 
En appuyant sur INEXT], on découvre toutes les 


fonctions classiques de rotation, décalage, 
décalage arithmétique, et opérations 
booléennes. 


Les variables utilisateur 


Le menu ftuser] affiche les variables crées. 
Ainsi, notre variable "TVA" est affichée dans 
ce menu. Si plus de six variables sont créées, 
on accède aux plus anciennes par la touche 
[NEXT]. 


La dernière rangée de ce menu flexible est 
occupée par 3 fonctions. La première d’entre 
elles ([ORDER]) permet de réordonner l'affichage 
des variables. Par défaut, les plus récemment 
créées viennent en premier. La seconde 
(ICLUSR]) efface foutes les variables créées. 
Prudence ! La dernière ([IMEM]) dépose sur la 
pile le nombre d’'octets disponibles. 


LE CALCUL SYMBOLIQUE 


Le calcul symbolique est la plus grande 
nouveauté du HP-28C. Jusqu'ici, ce type de 
calcul était réservé aux gros ordinateurs, 
disposant de capacités phénoménales. Pour la 
première fois, le calcul symbolique se met 
dans la poche... 


Qu'est-ce donc que le calcul symbolique ? Je 
pourrais le définir comme le calcul sur des 
symboles, et non plus sur des valeurs 
numériques. On cherche à développer (x+1}”, 
pas à trouver la valeur pour un x particulier. 
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Comment traite-t-on une telle expression sur 
le HP-28C ? 


D'abord, souvenons-nous qu’une expression 
symbolique ou une équation est une "chose" 
entourée par des apostrophes (’). Plus 
concrètement, prenons quelques exemples : 
'SIN(T)/T' est une expression 

ISIN(X)=0' est une équation 


Pour traiter (x+1)° sur le HP-28C, nous ferons 
donc : 

'(X+1)/31 [ENTER] 

pour déposer l’expression dans la pile. 


Il faut maintenant la développer jusqu’à 
arriver à la forme finale. On utilisera la 
fonction LEXPAN] ("développer") 6 fois : 

[(ALGEBRA] sélectionne le menu adéquat 

(EXPAN] 


[EXPAN] 

et nous voyons : 

XX CN DEN CAE TD EXE CIE TI CIE CXÉX IE TE C2EXET )+ 
1*(1*1))! 

Mais ce résultat ne vous conviendra peut-être 

pas, vu l'excès de 1*x. Il faut réassembler les 

termes isolés, et éliminer toutes les opérations 

inutiles : 

[COLCT] 

donne: ‘1+X°3+3*X"°2+3*X1 après un temps de 

calcul relativement long (15 secondes), mais 

étonnamment court quand on pense à tout le 

traitement nécessaire. Sauriez-vous faire ceci 

en moins de temps, avec un crayon et un 

papier ? 

Ces possibilités sont impressionnantes. 

Voyons-les en détail : 


- le fonctionnement de base du calcul 
symbolique est l’application d’opérateurs à des 
symboles non valués. Autrement dit, si !x' 
n’est pas défini, vous pouvez taper ISIN] (avec 


*’X’ sur la pile, bien sûr) pour obtenir 
l'expression  'SIN(X)'. De même pour les 
opérateurs diadiques. Ainsi, puisque ‘"sSIN(X)' 


est toujours dans la pile, nous pouvons taper 
'Y [+] pour obtenir : 'SINCX)+Y!. 


- le HP-28C connaît les règles de bases de 
l’algèbre. Notamment les propriétés 
d’associativité et de distributivité sur le corps 
des réels. Elles trouvent leur application dans 
[EXPAN] et [COLCT] principalement. 

- quelques règles remarquables sont aussi 
connues. Ainsi, [PI] [SIN] donne 0. 


Ouvrons une parenthèse : l'évaluation de PI ne 
pose aucun problème. Mais celle de PI/6 en 
pose. 'SIN(PI/6)' n’est pas évalué en 0.5, mais 
reste ‘SIN(PI/6)'. Pour obtenir 0.5, il suffit 
d'évaluer PI/6 (connaître la valeur numérique 
approchée) avant d'extraire le sinus. Ceci se 
fait par la pression de [->NUM] avant [SIN]. 
[->NUMJ convertit les constantes symboliques 
(PI, e et ïi) en leur valeur numérique 
approchée. Refermons la parenthèse. 


- le HP-28C connaît les dérivées des fonctions 
de base, ainsi que la propriété de dérivation 
des fonctions composées. Par exemple, 
dérivons sin(t)/t par rapport à t : 


‘T' [ENTER] dépose t dans la pile 
[TRIG] [SIN] sini1) dans la pile 
[LAST] ramène ! dans la pile 

(/1 place sin(t)/t dans la pile 

‘T' [ENTER] variable de dérivation 
[d/dx] et. 


:COS(T)/T-SIN(T)/T"2' apparaît. Pour ma part, j'ai 
été ébahi la première fois que j'ai vu cette 
éclatante démonstration. Et même aujourd’hui, 
d’ailleurs. 


Si nous manipulons un peu le calcul 
symbolique, nous nous apercevons que les 
identités remarquables n’ont pas été inculquées 
au HP-28C. Ainsi, [EXPAN] peut développer 
(x+1)? en x?+2x+1, mais (COLCT] ne peut pas 
faire l'opération inverse. 


Ces développements (ou factorisations) sont 
parmi les manipulations les plus difficiles du 
calcul formel. Comment savoir quelle formule 
appliquer, dans quel sens ? En bref, les 
systèmes de calcul formel connaissent les 
mêmes difficultés que l’étudiant moyen devant 
une équation. Il est normal que le HP-28C ne 
connaisse pas les identités remarquables. 


Le HP-28C préfère donc le calcul manuel. 
C’est la raison d’être du sous-menu tForM]. Le 
HP-28C affiche l'expression au sommet de Ia 
pile, et entre dans un mode spécial. Dès lors, 
aucune modification ne peut changer la valeur 
de l'expression. Sur simple pression de touche, 
on déplace les parenthèses, on commute deux 
sous-expressions, on rajoute 1 et on enlève 1 
(+1-1=0), on transforme une somme de 
logarithmes en un logarithme de produits, etc. 
Quand on sort par [ATIN], l'expression 
modifiée remplace la précédente sur la pile. 





Fort marri de ne pouvoir factoriser x?+2x+1 
en (x+1)? automatiquement, j'ai donc procédé 
par le sous-menu [FORM]. À titre indicatif, il a 
fallu à peu près 2 minutes et demi pour y 
arriver. La manipulation est assez lourde, et 
un étudiant moyen sera certainement plus 
rapide. Cependant, ce menu possède un 
avantage énorme : celui qui l'utilise ne peut 
introduire d’erreur de calcul. Je pense que tout 
le monde comprendra ce que je veux dire. 


Le calcul formel est encore visible dans la 
résolution d'équations. 


Le menu fsoiv] a pour rôle la résolution des 
équations, aussi bien pour les solutions 
formelles que pour les solutions numériques. 


En pratique, t1S0L1 servira à isoler la première 
occurrence de Ia variable trouvée dans 
l'expression. Il est préférable de disposer d’une 
expression convenabiement arrangée. [QUAD] 
approxime une fonction par un développement 


de Taylor à l’ordre 2, puis résoud ce 
polynôme. 
[ISOL] travaille proprement. Je m'explique. 


Supposons que nous cherchions les racines de 
l'équation x?=4, Nous faisons donc : 

1X°2=4 [ENTER] 

1X 

[SOLV] [ISOL] 

Le HP-28C affiche : 's1*2: 

Le s1 a une signification spéciale cette 
"pseudo-variable" signifie +1 ou -1. Autrement 
dit, le HP-28C sait donner toutes les solutions 
d’une équation. 


Pour la résolution numérique, le sous-menu 
[SOLVRI permet de fixer interactivement toutes 
les variables, et de résoudre pour l’inconnue. 


Toutes ces possibilités de calcul formel sont 
pour la première fois dans un calculateur de 
poche. Ne trouvez-vous pas qu’il y a un pas 
de géant par rapport à ce qui existe 
actuellement sur le marché ? 


LE TRACE 


Nous avons vu, au début de cet article, que 
l'écran du HP-28C affiche 4 lignes de 23 
caractères ou bien 137 points sur 32 de 
hauteur. Le HP-28C est donc capable de faire 
du graphique ? 





Certainement, et c’est encore une nouveauté. 
Si cette possibilité existe déjà sur des matériels 
concurrents, elle est exploitée ici dans un 
environnement très différent. L'ensemble des 
fonctions disponibles sur le HP-28C est riche, 
et le tracé apparaît comme une fonctionnalité 


supplémentaire (mais Ô combien utile), 
s’intégrant parfaitement à l’ouvrage. 
Mais je ne veux pas vous faire languir 


davantage : un appui sur 
dans le menu graphique. 


[PLOT] nous place 


Le HP-28C peut 
courbes : 


tracer trois sortes de 


- les courbes simples correspondant à une 
expression. Par exemple, nous pouvons 
visualiser la courbe de sin(x)/x entre deux 
points donnés. 


- deux courbes simultanément. Il suffit de 
préciser non pas une expression, mais une 
équation (deux expressions séparées par un 
signe "="). Il faut, bien sûr, que ces deux 


expressions soient fonction de la même 
variable pour que le HP-28C sache s’y 
retrouver... 

- une collection de données statistiques 


(visualisation d’un nuage de points). C’est la 
suite logique du menu fIStAT], et l'utilité 
n’échappera certainement pas à tous les 
statisticiens… 

Pour tracer une courbe, le HP-28C doit 
connaître : 

- les coins inférieur gauche et supérieur droit 
de la fenêtre de tracé, 

- l'intersection des axes (on peut choisir les 
coordonnees du point d’intersection), 

- la résolution (la différence des abscisses 
entre deux points), 

- la variable indépendante utilisée (x pour 


f(x)). 


Que ceci ne vous effraie pas ! En pratique, 
tout est très simple (comme on peut s’y 
attendre avec un tel matériel). Voici comment 
je procède pour tracer une courbe. Je vous 
préviens, c’est totalement heuristique ! 


Supposons que nous voulions tracer la fonction 
e”Xcos(x). Nous allons faire : 

COS(X)*EXP(-X)' [ENTER] 

[PLOT] 

[STEQ] stocke l’équation courante 

(DRAW] trace une première courbe 
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Alors, nous pouvons observer que l’échelle 
n’est pas bonne. Le HP-28C a tracé entre 
(-6.8,-1.5) et (6.8,1.5) Nous allons donc 
changer les coins inférieur gauche (tPMIN]) et 
supérieur droit ([PMAX]). 

(-2,-1.5) [PMIN] 

(5,1.5) [PMAX] 

[DRAW] 

Raté ! Le maximum de la fonction culmine à 
l’ordonnée 1.5509... Essayons à nouveau : 
(5,1.551) [PMAX] 

[DRAW] 


Ca y est. Cette fois-ci, nous distinguons 
clairement la sinusoïde amortie. La description 
que vous venez de lire vous a peut-être paru 
longue. Rassurez-vous : en face d’un HP-28C, 
les manipulations sont très naturelles. 


Mais il y a encore plus simple ! J'ai gardé la 
"digitalisation" pour la bonne bouche ! 


Lorsque la courbe est visualisée, quatre des six 
touches blanches servent à manipuler un 
curseur graphique, matérialisé par une petite 
croix. La touche blanche de gauche sert à 
déposer les coordonnées du curseur dans la 
pile, sous forme d’un nombre complexe. 


En guidant judicieusement le curseur, changer 
les limites du tracé devient un jeu d’enfant. Il 
n’y a même plus besoin de réfléchir (ahhhh). 


Il est bien évident que la digitalisation est 
utilisable pour bien d’autres choses. 


Quels sont les champs d’application possibles 
pour ce menu ? L’écran n’est il pas trop petit 
pour être réellement utile ? 


Cette caractéristique est, pour moi, l’une des 
plus utiles du HP-28C. II ne s’agit pas 
d’obtenir des superbes dessins dignes des plus 
belles tables traçantes de la marque. Le 
HP-28C est là pour toucher du doigt, pour 
visualiser concrètement et rapidement votre 
fonction. 


Ce menu permet en outre de rechercher 
"oraphiquement" des racines d’équations, mais 
peut aussi être vu comme un "accessoire" très 
agréable du menu de recherche de racines 
( [SOL V1). 


Ces possibilités, couplées au reste des 
Caractéristiques du calculateur, rendent très 
agréables les manipulations (autrefois 
fastidieuses) d'équations. 


Notons à propos que certaine calculatrice 
extrème orientale offre déjà une fonction de 
tracé de courbes. Celle-ci donne rapidement 
des courbes plus liées, et avec un plus grand 
écran. Certes. Mais c’est le seul domaine où la 
comparaison tourne à son avantage... 


LA PROGRAMMATION 


Vous l’attendez depuis le début de l’article. 
Elle est là. 


Le HP-28C est loin du Basic ou de langages 
spécialisés du type HP-41. Il s’agit, ici, de 
RPL (Reverse Polish Lisp). En quoi cela 
consiste-t-1l ? 


Le Lisp se reconnaît (de très loin) dans la 
manipulation d'objets quelconques. Mais, si le 
nom n’est pas mentionné, je pense surtout à 
Forth. En effet, une machine disposant d’une 
pile de taille (presque !) infinie, où tous les 
fonctions opèrent sur la pile me fait davantage 
penser à un Forth. En revanche, Forth dispose 
d’outils de très bas niveau que le HP-28C ne 
possède pas. 


Résumons-nous : la programmation n’est pas 
faite pour les bidouilleurs, mais pour les 
étudiants et ingénieurs qui ont besoin 
d’automatiser des séquences de touches. 


En revanche, le HP-28C possède une belle 
panoplie de structures de contrôles. Les tests 
peuvent avoir ou non un "alternant si faux". 
Les branchements en cas d’erreur sont prévus 
(LIFERR]). Les boucles sont particulièrement 
remarquables : 


début fin START boucle NEXT 

début fin START boucle incrément STEP 
début fin FOR var boucle NEXT 

début fin FOR var boucle incrément STEP 


DO boucle UNTIL fesf END 
WHILE {est REPEAT boucle END 


Et il n’y a pas de GOTO ? Non ! Une note 
vous expliquera ceci en détail dans le manuel 
de référence. 


Pour fixer les idées sur la manière dont le 
HP-28C se programme, voyons un exemple : 
le programme suivant affiche les touches 
appuyées en émettant un signal sonore. On 
l’'arrête en appuyant sur la touche [SPACE]. 





« début du programme 
CLLCD efface l'écran 
1 valeur ("vraie") pour Le contrôle de 
La boucle WHILE .. REPEAT .. END 
WHILE 
DUP Dupl'ique cette valeur car REPEAT 
REPEAT l'enlève de La pile pour La tester. 
KEY renvoie O0 ("faux") si rien 
ou "touche! et 1 si il y a appui 
IF teste la valeur rendue par KEY 
THEN si touche appuyée : 
DUP dupl'ique La touche 


2 DISP affiche La touche sur La deuxième 
Ligne de l'écran 

415 .1 415 Hz (LA des baroqueux), .1 seconde 

BEEP et beeeeeeeeeeeep ! 
A présent, il y a dans La pile : 
booléen de controle, touche 


"+ touche { espace ? 
SWAP on met l'ancien booléen au sommet 
DROP ..-. et on l'oublie ! 
END fin du IF 

END fin du WHILE .. REPEAT .. END 

DROP on oublie définitivement Le booléen 

CLMF et on remet l'affichage normal 

» fin du programme 


Il est bien évident que ce programme est 
introduit à la file, sans les commentaires. 


Le programme est maintenant dans la pile. 
Qu'en faire ? La première chose est de lui 
donner un nom. Autrement dit, nous allons le 
mettre dans une variable : 


'AREUH CSTO] 


Ensuite, nous pouvons l'utiliser. Deux 
méthodes 'AREUH [ENTER], OU [USER] [AREUHI]. 
Cette dernière est la plus rapide. 

Les programmes peuvent appeler d’autres 


programmes. Une procédure contient un seul 
point d’entrée et un seul point de sortie. Cela 
facilite la rédaction de procédures courtes. Ces 
caractéristiques, ajoutées à l'absence de 
GOTO, encouragent la programmation 
structurée. 


Les manipulations dans la pile n'étant pas 
d’une clarté limpide, HP a prévu des variables 
locales. Il s’agit de donner un nom à un 
élément dans la pile, pour le réutiliser plus 
facilement dans la suite (par exemple dans une 
formule algébrique). Il n’y à pas de conflit 
entre les noms de ces variables et les noms des 
variables créées en exécution normale. 





La mise au point est facilitée par quelques 
fonctions bien pratiques. Notamment, un HALT 
en début de programme arrête l’exécution, et 
rend la main à l'utilisateur. La touche rss] 
continue l’exécution en pas à pas. La fonction 
en cours est affichée temporairement en 
inverse vidéo en haut de l’écran, et le résultat 
est immédiatement visualisé dans la pile. 


Notons que la rapidité d'exécution des 
programmes est voisine de celle du HP-71. 
C'était prévisible, sachant que ces deux 
calculateurs ont le même micro-processeur. 


Le sujet est vaste, et je préfère arrêter là la 
présentation. Après tout, il faut en laisser pour 
le jour où... 


CE QUI N’A PAS ETE TRAITE 


Le HP-28C est un calculateur dont les 
possibilités sont très étendues. Je n'ai pas le 
temps ni la place de tout traiter en détail. 
Aussi, je vous donne un simple aperçu des 
autres caractéristiques. 


Le comportement général du calculateur est 
géré par un menu ([MODE] permettant entre 
autres de régler de valider ou non les 
caractéristiques [UNDO] et autres [COMMANDI]. 


64 flags stockent des informations binaires. 
Certains sont utilisés par le système, d’autres 
sont réservés pour l'utilisateur. Les noms des 
fonctions de manipulation sont directement 
issues du HP-41. 


Toutes les fonctions sont répértoriées dans un 
catalogue donnant leur usage (arguments 
nécessaires). 


Le menu [PRINT] offre des fonctions de gestion 
de l’imprimante. 


Le HP-28C connaît 120 unités, et sait 
convertir n'importe quelle équation aux 
dimensions. On peut définir ses propres unités, 
ainsi qu’une "dimension" supplémentaire. 


LES MANUELS 


Le HP-28C est livré avec un manuel 
d’apprentissage ("getting started") et un manuel 
de référence. 


JPC 41 Page 11 


en JPC 41 Page 12 


Le premier (254 pages) présente un aperçu du 
fonctionnement du HP-28C. Une idée 
intéressante est celle de "l'étape 0" : au début 
de chaque chapitre est présentée une séquence 
de touches permettant de suivre tous les 
exemples. Il s’agit d’une mise à l’état initial, 
positionnant le mode d'affichage, le mode 
trigonométrique, etc. 

On est ainsi sûr d’obtenir des résultats 
conformes à la description donnée, sans étape 
superflue en début de chaque exemple. 


Ce manuel n’est qu’un manuel de 
présentation : beaucoup de possibilités restent 
inconnues après la lecture de la dernière page. 


Le second manuel (406 pages) explique les 
fonctions du HP-28C menu par menu. 


Ce groupement en menus est, à mon avis, une 
innovation malheureuse. Il eût été préférable 
de classer le manuel de référence (comme 
celui du HP-71, par exemple) par ordre 
alphabétique. Ceci, complété par une simple 
table des fonctions organisée par menus aurait 
donné un manuel plus facilement utilisable. 


Je l’ai trouvé très peu pratique, ceci pour trois 
raiSONS : 


- Il faut connaître le menu dont dépend une 
fonction pour y accéder. 


- Il faut d’abord chercher le menu, dans 
l’ordre alphabétique, puis la fonction, dans 
l'ordre du menu. Cette double recherche est 
fastidieuse. 


- Comme certaines fonctions dépendent de 
menus différents, le manuel procède par 
renvois. ce qui fait tourner encore plus de 
pages. 


J'aurais aimé une information structurée de 
telle manière que l’accès soit naturel et rapide. 


D'autre part, il faut noter qu’il y a, dans 
l’ensemble, peu d’exemples. En effet, le 
manuel d'apprentissage en comporte, mais 1l 
ne couvre pas tout le sujet. D’autre part, le 
manuel de référence ne contient pas 
d'exemples, et c’est normal. Donc, il y a 
beaucoup de fonctions dont il faut imaginer 
l’utilisation. 


Cependant, le HP-28C est suffisamment 
naturel pour que la lecture des manuels en 
permette une utilisation "ordinaire". 





MON OPINION 
Et je la partage... 


Nous voici dans la dernière partie de ce banc 
d’essai. J’ai manipulé pendant suffisamment de 
temps le HP-28C pour me forger une opinion. 


A gui s'adresse le HP-28C ? 


Aux étudiants : il y a beaucoup de choses 
intéressantes. D’accord, un étudiant "normal" 
va beaucoup plus vite en calcul symbolique 
qu’un HP-28C. Seulement, ce dernier ne se 
trompe pas. D'autre part, les fonctions de 
tracé peuvent être d’un grand secours. La 
programmation de formules (fonctions définies 
par l'utilisateur) ouvre plein d’applications. 
Bien sûr, le prix peut paraître élevé pour un 
étudiant. Mais, c’est un luxe dont on pourra 
difficilement se passer après y avoir goûté... 


Aux ingénieurs : l’étendue des possibilités du 
HP-28C est très vaste, et un ingénieur n’en 
utilisera qu’une partie. Et cette partie là 
justifiera seule l’achat. Le HP-28C est un outil 
toujours prêt, et qui montrera rarement ses 
limites. 


Les défauts du HP-28C 


Il manque terriblement de mémoire. La 
programmation ne peut être envisagée que 
comme définition de fonctions utilisateur, et 
guère plus. Le traitement de grosses matrices 
ou de grandes séries statistiques se révèle 
pénible, voire inenvisageable. 


Le calcul symbolique ne va pas assez loin. 
C'est déjà magnifique, mais on s’y habitue 
tellement vite qu’on en veut déjà plus. Dis, 
monsieur HP, tu peux pas le faire un peu plus 
gros ? 


La fonction de tracé est assez lente. 
L'utilisation de type "“essai-recommence" est 
rendue moins agréable. Heureusement que 
l'augmentation du paramètre de résolution 
accélère le processus ! 


Les qualités 
Le prix : je pense que le HP-28C n'est pas 


une machine chère au regard des innombrables 
possibilités qu’elle offre. 


Ouf ! Le HP-18C m'avait fait très peur, en 
abandonnant notre chère RPN.… Et le grand 
mérite du HP-28C est d’avoir concilié RPN et 
formules algébriques. 


Le calcul symbolique : son introduction est 
une petite révolution. Assurément, comme lors 
de l’apparition du HP-35 (première calculateur 
scientifique), on peut s'attendre à un 
changement de la nature des problèmes. On 
s’intéressera peut être enfin à la résolution du 
problème et non aux moyens de calcul. 


Le tracé de courbes : c’est moins nouveau, ça 
existe déjà depuis quelque temps. Il n’en faut 
pas moins souligner l'intégration dans l’édifice. 


L'écran multi-lignes : impératif pour le tracé 
de courbes. Depuis le temps qu’on l’attendait ! 


Le traitement des objets : les concepts mis en 
oeuvre feraient bien d’être copiés dans les plus 
gros ordinateurs. La  banalisation des 
opérateurs est une réelle nouveauté. 


En manipulant le HP-28C, j'ai envisagé 
immédiatement bon nombre d'utilisations. 
Cependant, j'ai le sentiment d’être à l’aube 
d’une nouvelle ère. Je suis convaincu que 
l’ensemble des domaines d'utilisation ne peut 
être envisagé aujourd’hui. Demain, peut-être... 


Globalement, j'ai été émerveillé par ce que 
j'ai pu découvrir dans ce calculateur. Tout 
n’est certes pas parfait, mais c’est un 
gigantesque bond en avant. 


Comme d’habitude, HP innove. Le premier 
calculateur scientifique de poche était le 
HP-35, le premier calculateur de poche 
programmable était le HP-65 et le premier 
calculateur alphanumérique était le HP-41. Le 
premier calculateur symbolique est le HP-28C. 


Pierre David (37) 








LE HP-28 PAR SON PERE 


William C. Wickes est bien connu des 
spécialistes de la programmation synthétique 
sur HP-41. Son livre “Synthetic Programming 
on the HP-4]" «a servi de bible à toute une 
génération de programmeurs. 


Il est maintenant employé aux laboratoires 
Hewlett-Packard de Corvallis il est le 
"Project Manager” du HP-28C. Cela signifie 
que sa responsabilité est grande dans la 
conception de ce calculateur. 


Le texte qui suit est la traduction d'un article 
initialement destiné à CHHU, et qui nous a été 
très aimablement transmis par HP. Remercions 
ici MM. Michel Maupoux et Philippe Chaillot 
pour leur collaboration. Remercions aussi 
Janick Taillandier pour sa traduction. 


LE HP-28 VU DE L'INTERIEUR 


Enfin "l’autre" est arrivé. HP annonce le 
HP-28C, le calculateur "scientifique" au 
format calepin que tout le monde attendait 
depuis l'introduction du HP-18C "Business 
Consultant" en Juin dernier. Et au grand 
soulagement de tous ceux qui pensent juste, 


c’est un calculateur utilisant la notation 
polonaise inverse (RPN), avec une vraie 
touche [CENTER] qui occupe sa place 


traditionellement proéminente sur le clavier. 


Mais, attendez une minute. Une pile 
"infinie" ? Pas d’interdiction de mouvements 
de la pile ? RCL est sur une touche shiftée ? 
Nulle part de CLX - d’ailleurs où est le 
registre X ? Qu'en est-1l de la Tradition ? 
Ont-ils perdu la tête ? 


Beaucoup de possesseurs de calculateurs HP 
peuvent avoir ce type de réactions quand ils 
découvrent le HP-28C, en particulier lorsque 
certaines des touches auxquelles ils sont le plus 
habitués donnent des résultats étonnants. Cela 
ne fait aucun doute : le HP-28C ne fonctionne 
pas exactement comme ses prédécesseurs RPN. 
Dans cet article, j’expliquerai les raisons qui 
nous ont conduites à nous écarter de la 
tradition et pourquoi nous avons dû 
abandonner des standards éprouvés pour 
supporter la nouvelle génération, en termes de 
possibilités de calcul, représentée par le 
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HP-28C. En chemin, j'espère vous convaincre 
que ces possibilités valent la peine d’apprendre 
les quelques principes nouveaux dans le 
fonctionnement du calculateur. 


LES ORIGINES 


L'origine du HP-28C remonte à 2 ans, deux 
ans et demi quand les modules d’application 
pour le HP-71 se terminaient, À ce moment, 
l’équipe qui avait produit les modules Math et 
Forth / Assembleur pour le HP-71 a dirigé 
son attention vers la conception d’un nouveau 
système d'exploitation pour calculatrice. Nous 
étions convaincus que la prochaine génération 
se devait de supporter le calcul symbolique, 
c’est à dire la possibilité d’effectuer des 
opérations sur des quantités représentées par 
des symboles qui n’ont pas besoin d’être 
converties numériquement. Après étude, il est 
apparu clairement que les systèmes et les 
langages des HP-71 et HP-41C ne convenaient 
pas parce qu’il n’y a pas de méthode pour 
appliquer des fonctions à des expressions non 
évaluées (programmes). De la même manière, 
les systèmes et langages existant sur PC et 
supportant le calcul symbolique ne 
conviennent pas à une machine portable car ils 
utilisent trop de mémoire vive et morte. 


À la fin, nous avons commencé à développer 
un nouveau système d'exploitation adapté à 
nos besoins. Ce développement a été achevé 
environ un an plus tard et nous nous sommes 
consacrés à l'implémentation d’un calculateur 
symbolique. Pendant ce temps, le projet 
HP-18C avait commencé un développement 
parallèle et il est devenu le premier produit 
basé sur notre nouveau système. Le HP-18C 
utilise le même langage interne et la même 
logique d'exécution que le HP-28C, même si 
son interface utilisateur est très différente. 
Bien que le 18C n'offre pas directement à 
l'utilisateur de possibilités de calcul 
symbolique, la fonction de résolution 
d'équations effectue certaines manipulations 
symboliques. 


Les nouveaux système d’exploitation et 
langage sont basés sur une combinaison de 
Forth et de Lisp, connu de manière informelle 
chez HP sous le nom de RPL (Reverse Polish 
Lisp). Bien que la rigidité de la gestion de 
mémoire et le manque de protection de 
l'utilisateur existant en Forth le rende peu 
adapté comme langage de calculateur, il appert 
que sa logique d'interprétation, ses piles de 





données et d’adresses illimitées sont idéales 
pour Ja manipulation et l'évaluation 
d’expressions symboliques. L’exécution du 
RPL est basée sur une généralisation du 
concept de “boucle interne" de l'interprète 
Forth. Signalons pour les amateurs que le 
processeur de type Saturn utilisé dans cette 


nouvelle machine dispose d’une nouvelle 
instruction PC=(A) qui accelère la boucle 
interne. 

Lisp est le langage traditionnel 


d’implémentation du calcul symbolique. RPL 
s'inspire largement de Lisp en particulier dans 
l'implémentation des manipulations de liste et 
des lambda variables (les variables locales en 
terminologie HP-28C). 


Les grands principes de l'interface utilisateur 
de la 28 ont été définis en Janvier 1985, au 
terme d’une réunion de trois jours, à une 
époque où le développement du système 
d'exploitation était presque terminé. Le travail 
sur le code de la HP-28C a commencé 
officiellement en Mai pour se terminer en 
Juin 1986. 


PRINCIPES 


L'idée centrale dans la conception de la 
HP-28C était de fournir un calculateur qui 
appliquerait les mêmes méthodes de calcul à 
une grande variété "d'êtres mathématiques", en 
particulier les expressions symboliques. Les 
calculatrices sont caractérisées par un 
fonctionnement du type “une touche = une 
fonction", une disponibilité immédiate et un 
type de programmation qui correspond de près 
à l’usage au clavier. 


Les programmes de calcul symbolique sur 
grands systèmes ou PC sont, à l’opposé, très 
forts en maths et faibles sur l'interface 
utilisateur. Nous n’avons jamais eu l'intention 
de nous mesurer à Macsyma ou à Reduce en 
terme de puissance, pas plus qu’un HP4I ne 
peut rivaliser avec un 8087 à 5 MHz. Nous 
voulions offrir le support pour des calculs 
symboliques rapides et interactifs. En d’autres 
termes, nous voulions faire pour le calcul 
symbolique ce que le HP-41 et ses ancêtres 
ont fait en calcul numérique. 


Notre point de départ était le calculateur RPN 
traditionnel et plus particulièrement le 
HP-41C. Bizarrement, nous n’avons jamais 
envisagé sérieusement de concevoir un 


ee 


calculateur algébrique, au sens où on l’entend 
actuellement. Nous avons pensé que le contrôle 
direct de la pile RPN par l'utilisateur est vital 
pour assurer un interface simple et cohérent 
pour toutes les opérations autres que les 
fonctions les plus élémentaires. La logique 
algébrique (AOS) échoue dès que l’on dépasse 
le niveau des calculatrices 4 opérations. Le 
Basic et les autres formes de langages où on 
entre directement les formules sont meilleurs, 
mais des machines comme le HP-71 ne 
constituent pas de bonnes calculatrices où à 
une touche correspond une fonction. En 
particulier, elles ne disposent pas de 
mécanisme pour le stockage temporaire 
d'arguments non nommés ou de résultats. 


Le HP-4I1C traite parfaitement bien les 
nombres réels flottants. Il n’est pas conçu pour 
traiter des entités plus complexes telles que 
des nombres complexes ou des matrices. Par 
exemple, un nombre complexe est traité 
comme deux nombres réels indépendants, l’un 
représentant la partie réelle et l’autre la partie 
imaginaire. L'utilisateur ou le programmeur 
doit s’assurer que les deux moitiés sont traitées 
ensemble puisque le calculateur n’a, de 
manière interne, aucune méthode pour 
reconnaître un complexe. La pile à quatre 
niveaux, qui est en général suffisante pour des 
nombres réels, devient une pile à deux 
niveaux ; seuls les calculs les plus simples 
peuvent alors être effectués. La situation est 
encore pire dans le cas de matrices puisque 
vous ne pouvez mettre qu’un élément à la fois 
sur la pile. La HP-15C est favorisée, mais 
l’entrave constituée par la structure rigide des 
registres demeure. 


Le HP-41C fait un petit pas vers une 
généralisation en offrant un type alphabétique, 
toutefois limité par la structure des registres 
ou de la pile à 7 octets. Mais le principe de 
base est bon : vous manipulez des chaînes sur 
la pile comme des nombres. Vous disposez de 
toutes les opérations de la pile et vous pouvez 
même rappeler ou stocker des chaînes de la 
même manière que des nombres. 


Ce traitement identique de deux types de 
données sur le HP-41C devient le principe de 
base du fonctionnement du HP-28C. La pile 
contient des "objets" et n’est plus un ensemble 
de registres de nombres. Un objet peut être 
n'importe quelle quantité mathématique ou 


logique pouvant être traitée comme une seule 
unité, quelque soit sa taille ou sa structure 
interne. Les objets supportés par le HP-28C 
sont : 


- les nombres réels 

- les nombres complexes 

- les nombres binaires (de 1 à 64 bits) 

- les chaînes alphabétiques 

- les vecteurs réels ou complexes 

- les matrices réelles ou complexes 

les listes (collections d’autres objets) 

les noms qui désignent des variables 

les expressions ou équations algébriques 
les programmes 


Quand, par exemple, vous entrez un nombre 
complexe dans la pile du HP-28C, l’objet 
"nombre complexe" est traité comme un tout et 
occupe un seul niveau de pile. Il est entré et 
visualisé comme une paire ordonnée de 
nombres entre parenthèses. (1,2) représente le 
complexe 1+21. Une fois qu’un nombre 
complexe est sur la pile, vous pouvez exécuter 
n’importe quelle commande du HP-28C valide 
pour un nombre, comme SIN, COS, LN, etc. 
comme s’il s'agissait d’un nombre réel. Ces 
fonctions acceptent également des 
combinaisons de réels et de complexes. 


De la même manière, les vecteurs et matrices 
sont traités en tant qu’entités. Placez deux 
matrices sur la pile, appuyez sur t+] et vous 
obtiendrez la matrice somme. Le point 
important ici est que vous n'avez pas à 
apprendre une nouvelle procédure pour chaque 
type de données que vous traitez. Toutes les 
vertus de la RPN sont maintenant appliquées 
uniformément à une grande variété d’objets. 


Vous devez indiquer au HP-28C le type de 
l’objet que vous introduisez, afin de lui 
permettre d'effectuer les bons contrôles de 
syntaxe. Ceci se fait en entourant l’objet au 
moyens de caractères spéciaux appelés 
délimiteurs. Ces délimiteurs sont [I 1 pour des 
vecteurs ou des matrices, # pour des nombres 
binaires, ( > pour des nombres complexes, : : 
pour des noms ou des expressions algébriques, 
« » pour des programmes, " " pour des chaînes 
de caractères et € > pour des listes. Les 
séquences entrées sans délimiteurs sont 
interprétées comme des nombres réels si elles 
commencent par un signe ou un chiffre ou 
comme une commande ou une variable sinon. 
Quand un objet est visualisé sur la pile, il est 
identifiable par l’utilisation des mêmes 
délimiteurs. 
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LA PILE DYNAMIQUE 


Tout programmeur RPN sait que ce qui 
demande Je plus d’astuce est de tout 
programmer avec une pile à quatre niveaux. 
Vous devez avoir constamment conscience des 
nombres qui sont poussés hors de la pile et 
vous devez toujours rappeler ou stocker des 
données dans les registres. Quand vous appelez 
un  sous-programme vous devez savoir 
combien de niveaux de pile il utilise. Les 
étranges nombres de contrôles de la forme 
aaa,bbbcc sont encore pires car difficiles à 
créer et à analyser. Ces monstres ont été crées 
au départ parce qu'il n’était pas envisageable 
d'utiliser trois niveaux de pile à des fins de 
contrôle (bien entendu, il faut initialement au 
moins cette place pour créer le nombre de 
contrôle). 


Le HP-28C élimine ces problèmes en rendant 
la pile dynamique : elle s’étend quand vous 
entrez des objets, elle diminue quand vous en 
enlevez. La taille de la pile n’est limitée que 
par la quantité de mémoire disponible. Il faut 
s’habituer à cette pile infinie : 


- les noms des registres X, Y, Z et T sont 
remplacés par des nombres de niveau. Le 
registre X est le niveau 1, Y est le niveau 2, 
etc. L'ancien système n’a pas de suite logique 
au-delà de 4 niveaux et cette numérotation 
vous permet d'accéder plus facilement, par 
programme, à un niveau particulier. 


- une pile "effacée" dans le HP-28C est une 
pile vide et non une pile pleine de zéros. Si 
vous effacez la pile et appuyez sur t+], vous 
obtenez le message d’erreur "Too Few Arguments" 
(Pas asez d'arguments). "Argument" est un 
terme générique qui désigne une donnée prise 
sur la pile et correspond à son équivalent 
mathématique. 


- si vous pouvez entrer autant d'objets que 
vous le souhaitez sur la pile, vous devez aussi 
penser à les éliminer quand vous avez terminé, 
sinon vous allez saturer la mémoire avec des 
objets périmés. 


- il y a beaucoup de nouvelles commandes de 
manipulation de la pile à apprendre. Si vous 
connaissez Forth, vous en  reconnaîtrez 
beaucoup. Vous pouvez modifier, dupliquer, 
ré-arranger et enlever des objets sur la pile. 
Vous pouvez même transformer toute la pile 
en une seule liste que vous pourrez sauver 
pour une utilisation ultérieure. 





- toutes les commandes telles que FIX, STO, SF, 
etc., qui dans les calculateurs précédents 
étaient des préfixes sont devenues des suffixes 
dans le HP-28C. Ainsi FIX 2 est devenu 2 FIX, 
SF 27 est devenu 27 sF et ainsi de suite. Cette 
rupture avec la tradition a probablement été la 
décision la plus difficile que nous ayons eû à 
prendre à propos de l'interface, et c’est la 
chose à laquelle il est le moins facile de 
s’habituer pour des utilisateurs de longue date 
de calculateurs HP. Cette nouvelle syntaxe 
permet à ces commandes d'utiliser la même 
logique que toutes les autres commandes et 
élimine le besoin de commandes indirectes. 


ENTER prend une importance et un sens 
nouveaux dans le HP-28C. Plutôt que 
d'utiliser le registre X (niveau 1) comme 


registre d'entrée, le HP-28C utilise une ligne 
de commande indépendante de la pile. Cette 
ligne est libre et illimitée : n’importe quelle 
combinaison de données et/ou de commandes 
peut y être introduite. Quand vous appuyez 
sur [ENTER], la ligne complète est traitée (en 
pratique, elle est transformée en programme 
immédiatement exécuté). Pour préserver la 
ressemblance avec les calculateurs précédents, 
beaucoup de touches correspondent à des 
commandes à exécution immédiate, qui 
effectuent un ENTER avant d'exécuter la 
commande. Ainsi, [11 LENTER] [2] [+] effectuera 
1+2, comme on peut s’y attendre (le 1+] pousse 
le 2 de la ligne de commandes sur la pile 
avant d'effectuer l’addition). 


Le HP-28C introduit une nouvelle possibilité 
de rattrapage sans équivalent sur les 
calculateurs précédents : UNDO. 

La première action de ENTER (obtenu par appui 
sur [ENTER] OU par commande à exécution 
immédiate) est de faire une copie de toute la 
pile avant qu'elle n'ait pu être modifiée. 
Quand toutes les opérations induites par ENTER 
ont été effectuées, vous avez la possibilité 
d’annuler leurs effets en appuyant sur [IUNDO]. 
La pile courante est alors remplacée par la pile 
sauvegardée lors du dernier ENTER. Ceci est 
également valable si vous videz la pile avec 
CLEAR : vOus pouvez tout retrouver en appuyant 
sur Uno, Cette commande n'est valable que 
pour la pile : elle ne restaure pas les variables 
purgées : elle n’annule pas davantage les effets 
des commandes sur autre chose que la pile. 
Comme vous pouvez l’imaginer, sauver une 
copie de la pile peut utiliser beaucoup de 
mémoire dans certaines circonstances, si bien 
que le HP-28C vous donne la possibilité de 
"débrayer" cette option. 





LASTX à été modifié également. La commande 
LAST du HP-28C vous retourne les 1, 2 ou 3 
arguments utilisés par la dernière commande 
qui a travaillé avec des objets sur la pile. 
Ainsi, si vous tapez : [1] [ENTER] [2] [+] [LAST], 
vous obtiendrez 3 1 2 sur Ia pile. LAST 
fonctionne avec des commandes non 
mathématiques telles que prop (l’équivalent 
pour le HP-28C de cix) ou swap (x<>y). Cette 
possibilité peut-être suspendue comme avec 
UNDO pour économiser la mémoire. 


EXECUTION DE COMMANDES ET MENUS 


Traditionellement, les "actions" 
pré-programmées d’un calculateur sont 
appelées fonctions. Dans la terminologie 
HP-28C, ce terme est utilisé dans son 
acception mathématique, c’est pourquoi les 
actions exécutables sont groupées sous le terme 
"opérations". Ainsi : 


- les opérations programmables sont appellées 
commandes ; 

- les commandes légales dans des expressions 
algébriques sont appelées fonctions (ce qui 
correspond exactement à la définition 
mathématique) ; 

- les fonctions pour lesquelles le HP-28C 
fournit les réciproques et les dérivées sont 
appelées fonctions analytiques. 


Les commandes peuvent être exécutées de 
plusieurs manières (les opérations qui ne sont 
pas des commandes, c’est à dire non 
programmables, sont toujours activées par une 
touche à exécution immédiate). D'abord, 
beaucoup de commandes sont disponibles sur 
des touches dédiées : appuyer sur la touche 
active la commande. Ensuite, toute commande 
peut être obtenue en tapant son nom dans la 
ligne de commande et en appuyant sur [CENTER]. 
Cette méthode est une simplification de [XEQ] 
[ALPHA] [ALPHA] sur le HP-41C pour obtenir 
des commandes non disponibles sur le clavier. 
Enfin, toutes les commandes sont disponibles 
par menus. 


Il y a six touches blanches pour les menus en 
haut du clavier droit du HP-28C. Les 
opérations associées, à un moment donné, à 
chaque touche sont visualisées sur la dernière 
ligne de l'écran. Chaque touche a ainsi une 
légende, de cinq caractères au plus, visualisée 
en blanc sur fond noir directement au dessus 
de la touche. Cette caractéristique, courante 
dans les ordinateurs de bureau HP, a été 





implantée pour la première fois sur le 
HP-18C. Le jeu courant d'étiquettes est 
sélectionné par une des 20 touches de sélection 
de menu. A chacune de ces touches 
correspond un menu d’opérations sur des 
thèmes communs (statistiques, trigonométrie, 
tracé..). S'il n’y a pas de menu affiché, la 
touche se comporte comme une touche de 
déplacement de curseur. 


Les menus peuvent avoir jusqu’à 24 
opérations. Pour passer d’un groupe de six à 
un autre, à l’intérieur du menu courant, on 
utilise les touches [INEXTI et [IPREVI. A la 
différence du HP-18C, àïl n’y a pas 
d’arborescence des menus. Vous pouvez aller 
d’un menu à un autre sans parcourir l’arbre. Il 
n’y à pas de touche tExIT]. De plus, quelque 
soit le menu actif, vous pouvez toujours 
exécuter une commande en tapant son nom 
dans la ligne de commande sans changer de 
menu. 


LES VARIABLES 


Avec la diversification des objets acceptés sur 
la pile, il a fallu généraliser l’ancien concept 
de registre de mémoire. À la place on utilise 
des variables portant un nom. STo crée une 
variable à partir d’un objet "nom" et d’un 
autre objet sur la pile et les combine en une 
variable. Le nom de la variable est une chaîne 
de caractères spéciale (avec quelques 
restrictions mineures sur les caractères 
admissibles) utilisée dans tous les appels 
ultérieurs à la variable ; l’autre objet devient 
le contenu de la variable. Un objet "nom" a 
des propriétés particulières si vous l’exécutez : 


- il retourne le contenu de la variable portant 
ce nom ; 

- si la variable n'existe pas, 
simplement mis sur la pile ; 

- si l’objet correspondant est un programme 
ou un nom d'objet, il est évalué. 


le nom est 


Les variables du calculateur correspondent aux 
variables mathématiques, qui ont un nom et 
une valeur. Evaluer le nom remplace le 
symbole par sa valeur (qui peut, elle même, 
être un symbole) : ceci correspond en 
mathématiques à une substitution. S'il n’y a 
pas de valeur associée au symbole, celui-ci 


correspond à une variable formelle en 
mathématiques : il conserve sa forme 
symbolique. 
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Les noms fonctionnent comme des commandes 
du calculateur : vous l’évaluez en le tapant et 
en appuyant sur [ENTER]. Vous pouvez 
également presser la touche correspondante 
dans le menu USER. Si vous souhaitez mettre 
un nom de variable sur la pile, sans l’évaluer, 
il suffit d’ utiliser le nom entre apostrophes, 
par exemple ’X’ ou ‘FRED”’. Les apostrophes 
indiquent au HP-28C de ne pas effectuer 
l'évaluation. Celle-ci pourra être réalisée 
ultérieurement en utilisant la commande EvaL. 


Les propriétés des noms que l’on vient de 
décrire expliquent pourquoi RCL se trouve 
reléguée sur une touche préfixée. Pour 
rappeler une donnée, vous évaluez son nom, il 
n’y à pas besoin d'utiliser RcL Ca n’est utile 
que pour rappeller un programme ou un nom 
dans une variable sans l’évaluer. Ceci est peu 
fréquent. 


Le processus qui permet d’assigner un 
programme à une touche est relativement 
complexe sur le HP-41C. En cherchant une 
syntaxe pour effectuer ces assignations sur le 
HP-28C, nous sommes arrivés à une solution 
évidente : rendre l'opération automatique. Le 
menu USER est géré dynamiquement et 
contient toutes les variables utilisateur, les 
dernières crées apparaissant en premier. S'il y 
a plus de six variables vous pouvez utiliser 
NEXT/PREV COMme pour un menu système. Vous 
pouvez modifier l’ordre des variables en 
utilisant ORDER. 


LE CALCUL SYMBOLIQUE 


La nouveauté la plus remarquable du HP-28C 
est sa capacité à appliquer des fonctions 
mathématiques à des noms ou des expressions 
non évaluées. C’est à dire que vous pouvez 
faire de l’algèbre : calculer avec des symboles 
et faire l’application numérique plus tard (ou 
jamais). Dans l’exemple utilisé précedemment, 
nous avons ajouté 1 à 2 en appuyant sur [1] 
[ENTER] [2] [+] ce qui rend 3. Mais nous aurions 
tout aussi bien pu taper [IA] [ENTER] [B] [+], OÙ 
A et B sont des noms, pour obtenir le résultat 
‘A+B', Si maintenant nous appuyons sur [SIN] 
nous obtenons 'SIN(A+B)'. Si, par exemple, nous 
affectons 10 à A et si nous appliquons EVAL à 
l'expression, elle sera transformée en 
'SIN(10+B)'. Nous pouvons également stocker 
‘12-51 dans B, alors EVAL donne :SIN(10+z-5)1. 
Pour terminer, s1 nous affectons 15 à Z, nous 
obtiendrons 0.5 (sin(30)). 
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Les fonctions du HP-28C sont les commandes 
légales dans des expressions. Par définition, 
elles acceptent les arguments symboliques. 
Toutes les fonctions qui ont une origine 
mathématique sont dans ce cas, mais pas les 
opérations sur la pile, DROP et swAP par exemple. 
La majorité des fonctions du HP-28C est aussi 
classifiée comme analytique le HP-28C 
connaît leur réciproque et leur dérivée. 


Les fonctions réciproques sont utilisées par 
ISOL qui résoud une équation en fonction d’une 
variable qui n’apparaît qu’une fois dans une 
expression, aussi complexe soit-elle. Ainsi, si 
nous entrons ‘A+B*C/D' ‘D!  [ISOLJ] nous 
obtiendrons la solution :B*c/(-A)' pour D. Le 
HP-28C est suffisamment intelligent pour 


connaitre les racines multiples : :'SINCX)>=Y' x! 
[ISOL] retournera en mode  radians 

"ASINCY)*C-1)"n1+pi*nit Où nl est un nom 
représentant un entier quelconque. Vous 


pouvez le remplacer par 0, +1, +2... pour 
obtenir un solution particulière. 


La fonction de dérivation opère en applicant 
la dérivation à chaque fonction spécifique et 
en appliquant les règles standards. Par 
exemple,  'SIN(COS(X))!  'X' [d/dx] donnera 
ICOS(COS(X))*(-SINC(X))". 


En plus des fonctions standards, le HP-28C 
inclut des commandes pour  l’analyse 
algébrique. Par exemple, '(A+B)"2! [EXPND] (sic) 
renvoie 'A”"2+2*A*B+B"21 : 1X+24Y+5+X1  [COLCT] 
renvoie 17+2*X+Y', Il y a même un éditeur de 
formule (FoRM) qui est un petit système expert 
vous permettant de réécrire une expression, 
sans en changer la valeur, en utilisant les 
règles classiques de l’algèbre (associativité, 
distributivité, commutativité, etc.). 


L’implémentation du calcul symbolique sur le 
HP-28C a une conséquence intéressante : le 
HP-28C est le premier calculateur à fusionner 
la logique RPN et les expressions algébriques. 
Un objet algébrique représente un calcul écrit 
sous une forme pseudo-mathématique (de type 
Basic), qui existe sur la pile et sur lequel on 
peut appliquer des fonctions mathématiques 
pour créer de nouveaux objets algébriques. 
Vous pouvez ainsi créer directement 
l'expression ‘SIN((A+B)"2)' en la tapant sous 
cette forme ou vous pouvez la construire de 
manière interactive en tapant : 

[A] [CENTER] [B] [+] [2] [”] [SIN]. 

Vous pouvez effectuer des calculs numériques 
de manière algébrique, si vous préferez 
‘1+2*(3+4) [EVAL] donnera 15. L’apostrophe au 


début indique au HP-28C que ce qui suit est 
en notation algébrique. La touche [EVAL] joue 
le même rôle que 1-1] pour un calculateur 
algébrique. 


Le HP-28C devrait mettre un terme à la 
controverse sur les mérites respectifs de la 
notation polonaise et de la logique algébrique. 
Ce calculateur permet d’entrer des formules 
sous forme algébrique pour les problèmes qui 
s’y prêtent bien et 1l dispose d’une pile très 
pratique pour mettre en attente les données ou 
les opérations. 


LA PROGRAMMATION 


Un point essentiel de notre philosophie d’un 
calculateur est que la programmation doit être 
le "stockage" d'opérations au clavier. C’est à 
dire que vous ne devez pas repenser une 
séquence de touches pour la conserver dans un 
programme. Dans le cas du HP-28C cette 
philosophie est implémentée de manière 
littérale. La programmation est le processus 
qui consiste à retarder l'exécution d’une ligne 
de commande. Ainsi tout ce que vous pouvez 
faire dans une ligne de commande, vous 
pouvez également le faire dans un programme 
et réciproquement. 


Le délimiteur de programme « fonctionne 
exactement comme l’apostrophe (:) pour les 
noms ou les expressions algébriques. Vous 
insérez « pour dire au calculateur de ne pas 
évaluer ce qui suit mais de le mettre sur la 
pile pour une utilisation ultérieure (» marque 
la fin du programme). En général, le 
programme est stocké dans une variable, mais 
vous pouvez l’exécuter grâce à [EVALI. 


Quand vous programmez le HP-28C, vous 
ajoutez de nouvelles fonctions à celles qui sont 
préprogrammées (comme en Forth). Pour 
exécuter un programme ou l'inclure dans un 
autre, il vous suffit de donner le nom de la 
variable le contenant, comme vous le feriez 
avec une commande standard du calculateur : 
pas besoin d’XEQ ou de GOSUB. Les 
commandes de base ne sont jamais que des 
programmes en mémoire morte et non en 
mémoire vive, écrits en utilisant un 
sur-ensemble du langage mis à la disposition 
de l'utilisateur. La pile d’adresses de retour n’a 
pas de limites fixes, de même que la pile de 
données, si bien que vous n'avez pas à vous 
occuper de la profondeur des appels. 








Les piles illimitées et l'évaluation par nom 
encourage la programmation structurée, c’est à 
dire le développement de petits modules 
autonomes et complètement définis 
extérieurement par les données et les résultats 
passés sur la pile. Le HP-28C ne fait pas 
qu’encourager ce type de programmation, il 
l’impose en ne fournissant pas de Go 10. A la 
place, le jeu d’instructions du HP-28C 
comprend plusieurs structures de programme : 
IF...THEN...ELSE, FOR...NEXT, ainsi que d’autres 
qui éliminent les curiosités telles que les ISG, 
la gestion du drapeau 25 en cas d’erreur et 
autres traits de programmation "spaghetti" 
existant dans les calculateurs précédents. 


Le HP-28C dispose également de variables 
locales (les lambda variables de Lisp) qui 
facilitent la programmation structurée et 
dispensent des manipulations complexes de 
pile. Considérons le programme : 

« 2 * SUAP 3 * + SWAP 4 * + » 

qui prend trois nombres sur la pile et 
multiplie le premier entré par 4, le second par 
3 et le troisième par deux et ajoute ces 
produits. En utilisant les variables locales ceci 
peut s’écrire : 

«-> abc«a4 *b3*+c2* +» » 

La commande -> enlève de la pile autant 
d’objets qu’il y a de noms après la commande 
et stocke chaque couple objet/nom dans une 
variable locale. Ces variables peuvent être 
utilisées en fonction des besoins dans le 
programme qui suit, elles sont détruites quand 
le programme est terminé. Il n’y a pas de 
conflit entre les noms de variables locales et 


ceux des variables ordinaires ou des 
programmes. 
Comme cet exemple s'exprime mieux en 


notation algébrique, écrivons le de cette 
manière : 

« -> à bc '4*a+3*b+2*c! » 

Ce format a l’avantage de créer une fonction 
utilisateur en stockant le programme dans une 
variable, par exemple : SOMME3. On peut 
alors l'utiliser dans une expression algébrique : 
11+SOMME3(1,2,3)' [EVAL] 


donnera 17. 


PROGRAMMES ET 
EXPRESSIONS ALGEBRIQUES 


Comme ce qui précède peut l'avoir suggeré, 
les expressions algébriques et les programmes 
sont très semblables. Ils représentent tous deux 
des séries  d’objets qui sont évalués 


JPC 41 Page 19 


séquentiellement. Ce sont des "procédures" en 
terminologie HP-28C. De plus, ils ont tous 
deux la même représentation interne. Un objet 
algébrique est stocké en RPN, même s’il est 
entré ou visualisé sous forme algébrique. 


Quand un objet algébrique est évalué, ce 
programme en RPN est exécuté. Ceci peut 
vous aider à comprendre ce qui se passe quand 
vous évaluez une expression contenant des 
variables qui ont des valeurs non algébriques. 
Considérons, par exemple, l’évaluation de ‘a-8: 
où À et B contiennent respectivement 1 et le 
programme « 2 SWAP ». Le résultat sera 1 car, si 
VOUS imaginez ‘'A-B' comme A B -, en 
substituant les variables par leurs valeurs, vous 
obtenez 1 2 SAP -, soit 1. 


LA MEMOIRE 


Ces considérations sur la programmation nous 
conduisent à parler de la principale limitation 
du HP-28C : la mémoire. Il dispose de 2 Ko 
de mémoire vive (Ram) dont 400 octets 
environ sont alloués en permanence au 
système, ce qui laisse 1700 octets utilisables. 
Comme, dans le même temps, le HP-28C 
utilise beaucoup de mémoire, ces 1700 octets 
ne peuvent pas se comparer à l'équivalent sur 
HP-41C. En ce qui concerne la 
programmation, il ressemble plus à un HP-41C 
d’origine, sans module. Il y a assez de 
mémoire pour stocker de petites quantités de 
données et écrire quelques petits programmes, 
mais pas réellement assez pour utiliser le 
HP-28C comme outil de programmation. Ceci 
n’est pas amélioré par l’absence de système de 
stockage de masse. 


Ceci veut dire qu’il faut davantage considérer 
le HP-28C comme un descendant du HP-15C 
que du HP-41C. C'est essentiellement un 
calculateur interactif, pour des utilisations 
ponctuelles : l'accent a été mis sur les 
fonctions intégrées. Cela a au moins le mérite 
que ces possibilités sont si vastes que beaucoup 
d’applications ne requièrent aucune 
programmation. 


LE FUTUR 


Bien que Hewlett-Packard espère que ce 
produit aura du succès pour lui-même, c’est 
aussi un produit expérimental, avec de 
nombreuses fonctionnalités nouvelles qui ne 
peuvent être évaluées pleinement que par les 
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utilisateurs. Nous n‘espérons pas avoir toujours 
pris la bonne décision sur les innombrables 
questions qui se sont posées pendant le 
développement du calculateur. Nous avons 
déjà une liste de points à améliorer, modifier, 
ajouter ou supprimer que nous aimerions 
trouver dans des futurs produits. Mais avant 
de les réaliser, la réponse du marché nous 
indiquera si les possibilités de base du HP-28C 
sont utiles. 


Ceux parmi vous qui vous souvenez de 
l’effervescence provoquée dans les clubs 
d'utilisateurs par l'apparition des calculateurs 
programmables (avec les 65, 67 et 41) peuvent 
voir dans le HP-28C une source de 
revitalisation. Il y a assez de possibilités 
nouvelles, des méthodes nouvelles, de trucs et 
astuces ou de programmes à développer et à 
échanger pour encourager le type de 
communication entre personnes pour lesquelles 
les clubs d’utilisateurs sont idéaux. 


L’INEVITABLE LISTE DES 
CARACTERISTIQUES 


Je vais conclure cet article en listant les 
possibilités du HP-28C. Je n'ai pas eû 
l’occasion d’aborder des domaines entiers tels 
que le tracé de courbes, les conversions 
d’unités ou les statistiques. Mais, pour tout 
couvrir, j'aurais dû redonner ici le Manuel de 
Référence du HP-28C, qui fait 406 pages (et 
dont beaucoup pensent qu'il est trop court). 
Voici donc la liste des possibilités du HP-28C. 


Arithmétique générale. Addition, soustraction, 
multiplication division, racine Carrée, 
puissance, inverse. 


Opérations sur les réels. Arithmétique ; 
fonction trigonométriques, logarithmiques et 
hyperboliques ; carré, racine carrée, puissance, 
inverse, valeur absolue, signe ; factorielle, 
fonction gamma ; pourcentage, variation en 
pourcentage, pourcentage du total ; maximum, 
minimum, parties entières et fractionnaires, 
modulo, arrondi, exposant, mantisse, 
générateur de nombres aléatoires. 


Opérations sur les complexes. Arithmétique ; 
fonctions trigonométriques, logarithmiques et 
hyperboliques ; conjugué, norme, argument, 
parties réelles et imaginaires, signe  ; 
conversions rectangulaire / polaire. 


Opérations sur les vecteurs et matrices réelles 
ou complexes. Arithmétique ; inversion, 
Systèmes d’équations, normes, déterminant, 
produits scalaire et vectoriel, conjugué 
transposé,  redimensionnement, conversion 
rectangulaire / polaire, parties réelles et 
imaginaires ; conversions réels / complexes. 


Opérations sur les entiers binaires. Bases 2, 8, 
10 et 16 ; arithmétique : taille de mots 
variable ; décalage et rotation aux niveaux bit 
et octet, décalage arithmétique ; opérateurs 
logiques ; conversions flottant / entier. 


Manipulation de chaînes. 
sous-chaîne, position, 
nombre / caractère, 
donnée. 


Concaténation, 
longueur, conversion 
conversion chaîne / 


Manipulation de listes. Rappel et stockage 
d’un élément, concaténation, sous-liste, taille. 


Opérations sur la pile. Duplication du premier, 
du second ou du n'°"® objet, duplication de n 
objets ; suppression d’un ou de n objets ; 


rotation vers le haut et le bas ; nombre 
d'objets ; composition et décomposition 
d’objets. 

Création d'objets. Rappel, stockage, 
évaluation, purge, édition. 

Opérations avec la mémoire. Arithmétique, 


inversion, COnjugué. 


Calcul symbolique. Toutes les fonctions sur les 
réels et les complexes ; développement et 
factorisation ; éditeur d’expressions ; rappel et 
substitution de sous-expressions. 


intégration 
intégration 


Calcul. Dérivée symbolique ;: 
symbolique de polynômes  : 
numérique ; séries de Taylor. 


Impression. Impression de données, de la pile, 
de variable, de l’afficheur, des modes : trace. 


Caractéristiques de programmation. Fonctions 
utilisateur, variables locales ; récursivité et 
imbrication illimitées, IF … THEN … ELSE, 
FOR: &S:NEXT= DO UNTIL, WHILE 

REPEAT ; possibilités d’arret, de reprise, 
d'abandon, d'exécution pas à pas, de pause ; 
lecture de touche, beep, gestion d’affichage, 
message et numéros d'erreur :; gestion de 64 





drapeaux, opérateurs logiques. 

Catalogues. Catalogue de tous les ordres 
programmables décrivant les paramètres sur la 
pile ; catalogue des unités (nom, abréviation, 
dimensions, valeur). 


Gestion du calculateur. Modes d’affichage 
standard, fixe, scientifique et ingénieur ; O à 
11 chiffres ; modes angulaires radians, 
degrés ; impression rapide : évaluation 
numérique ou symbolique ; rattrapage après 
erreur actif ou non ; indicateur sonore actif ou 
non. 


Logarithmes et exponentielles. Logarithmes et 
exponentielles base e et 10, In(1+x), exp(x)-1. 


Fonctions hyperboliques. sinh, cosh, tanh et 
réciproques. 


Trigonométrie. sinus, cosinus, tangente et 
réciproques ; conversions heure / minute / 
seconde ; conversions degrés / radians : 
conversion polaire / rectangulaire. 


Statistiques. Statistique sur une ou plusieurs 
variables : sommation, suppression, moyenne, 
écart-type, total, maximum, minimum, 
variance, covariance, corrélation. Régression 
linéaire ; distributions : normale, Student T, F, 
ch12. 


Résolution. Résolution numérique automatique 
d’expression/équation ; isolation symbolique de 
variables. 


Tracé de fonctions. Tracé de fonctions 
mathématiques ou de données statistiques ; 
gestion de l’échelle, des axes et du centrage du 
graphique. 


d’unités 
unités 
définies par 


Conversion d'unités. Conversion 
composées à partir des 120 
pré-programmées ou d’unités 
l'utilisateur. 


Bill Wickes 
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RAGOTS, BRUITS 
ET RUMEURS... 


Bien que je ne sois pas voyant, je vais me 
risquer ici à quelques pronostics concernant les 
futurs produits. Ceci n'engage évidemment 
personne. Cependant, comme elles proviennent 
du bulletin téléphonique de Richard Nelson 
(CHHU), on peut supposer qu'ils sont 
relativement fondés. 


D'abord, (CMT devrait annoncer très 
rapidement un écran HP-IL à cristaux liquides 
de 8 lignes de 40 colonnes pour environ $300. 


CMT devrait diffuser peu de temps après des 
unités de stockage de masse HPIL utilisant de 
la mémoire vive. Plusieurs configurations 
seraient disponibles : de 128 Ko ($345), 256 
Ko ($495) et 512 Ko ($795). Voilà de quoi 
accélérer vos opérations de fichiers ! 


On annonce enfin pour le milieu de cette 
année un module HP-41 combinant 8 Ko de 
mémoire vive et 16 Ko Eprom (MLDL). 


Faites de beaux rêves. 


janick Taillandier (246) 





HP41 


G. Tisserand 


Agrippine 


24 
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AGRIPPINE 


En l'an 55 de J.C., Agrippine vous a remarqué 
et acheté au marché aux esclaves de Rome. 
Très fier de ce choix, vous fûtes néanmoins 
déçu lorsqu’en arrivant au palais votre 
fonction vous fût révélée : goûteur de plats. 


Les Dieux savent qu’à cette époque, et 
particulièrement dans cette famille, les 
tournées de nectar avaient vite fait d’abaisser 
l’âge moyen de la mortalité. 


Il vous faudra donc jouer votre rôle et offrir 
[A] aux courtisans en disgrâce un plat (repéré 
pour les besoins de la 41 par un numéro) : si 
ce plat est empoisonné cela vous sera 
bénéfique en augmentant les points de votre 
capital de connaissance ou d’expérience ; mais 
si il est consommable il vous faudra goûter [F] 
un des quatre mets qui vous seront proposés. 


Pour être complètement "affranchi" il vous 
faut totaliser quatre points en ROS. 


Début : [E].… à la question entrez votre choix 
puis [A] pour offrir et [F] pour goûter, [R/S] 
pour voir les menus ;: vous pouvez arrêter le 
choix d’un plat en cours de défilement du 
menu par [R/S] puis [A] pour offrir ou [F] 
pour goûter. 


Lorsque vous goûtez un plat qui est contaminé 
et s’il vous reste des points d’immunité, vous 
ne risquez qu’une légère indigestion, sinon 
vous aurez le privilège de connaître le poison 
qui vous a terrassé. 


G. Tisserand (54) 


O1*LBL MAGRIPPINE! 


CF 05 E STO 05 FIX O0 
06*LBL 10 
4 MOFFREZ ! 1a4!1 PROMPT MRIZ ! XEQ 15 


MROTI " XEQ 15 M"EPICES " XEQ 15 "FRUITS " 


XEQ 15 GTO 10 


20*LBL A 

FS? 05 GTO 11 X>Y? GTO 10 4 SF 05 XEQ 00 
X#Y? GTO 11 "ENNEMI MORT" AVIEW PSE 4 RCL 05 
E + VIEW X STO 05 ‘"“AFFRANCHI...."  X=Y? 

PROMPT GTO 10 


43*LBL 09 
RCL 05 E - STO 05 M"INDIGESTUS " ARCL X AVIEW 
PSE X<=0? GTO 12 GTO 10 


55*LBL 11 

4 MGOUTEZ ! 1a4!n  PROMPT MERS "  XEQ 15 
"NECTAR " XEQ 15 "MIEL “ XEQ 15 "MELON " 
XEQ 15 GTO 11 


69*LBL 15 
E + ARCL X AVIEW PSE RTN 


76*LBL F 
X>Y? GTO 11 
GTO 10 


& (CF 05 XEQ 00 X=Y? GTO 09 


85*LBL 12 
7 XEQ 00 GTO IND X 


89*LBL 01 
MCURARE!!  PROMPT 


92*LBL 02 
MARSENIC'!  PROMPT 


95*LBL 03 
NCIGUE"  PROMPT 


98*LBL 04 
MDATURA!"  PROMPT 


101*LBL 05 
MACONIT!'  PROMPT 


104*LBL 06 
MOPIUM"  PROMPT 


107*LBL 07 
MSTRYCHNINE!"  PROMPT 


110*LBL 00 
RCL 00 9821 * 
E + END 


«211327 + FRC STO 00 * INT 


Exemple d'utilisation : 


XEQ "AGRIPPINE" 
OFFREZ ’Iad’ 
2 XEQ À 
GOUTEZ ’I1ad’ 
1 XEQ F 
OFFREZ ’lad’ 
3 XEQ À 
GOUTEZ ‘la’ 
4 XEQ F 
OFFREZ ‘lad 
3 XEQ À 





ENNEMI MORT 
2 XEQ À 
OFFREZ ‘la 
3 XEQ À 
GOUTEZ ‘lad? 
1 XEQ F 
INDIGESTUS 1 
OFFREZ ’lad’ 
4 XEQ À 
GOUTEZ ‘’lad’ 
3 XEQ F 
INDIGESTUS 0 
CURARE 
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LOGICIELS PROFESSIONNELS 
POUR LE HP-75 


Cet article est dédié à tous les possesseurs de 
HP-75, mes frères, récemment privés de leur 
principale source d’information en français ; 
Je sais qu’ils n’ont pas toujours sous la main le 
dernier catalogue d’EduCALC ou celui de la 
HP USERS’ LIBRARY, ni le loisir de lire 
assidûment PPC, CHHU et DATAFILE.. Je 
vais peut-être me faire agresser à la sortie de 
la prochaine réunion du Club si je dis que le 
75 reste une très bonne machine, malgré toutes 
ses limitations (non, ILS ne vont pas 
m'étriper ; ils m'ont même accordé, comme on 
dit, l'hospitalité dans leurs colonnes ! Merci...), 
et j'entreprends derechef un mini-inventaire 
de "tout ce qui existe dans le monde" (enfin, 
presque tout !). Car il existe d'excellents 
logiciels, mais très peu connus et diffusés. 
Alors, suivez-moi et en voiture ! 


La liste a été volontairement limitée aux seuls 
logiciels à vocation professionnelle. Donc, on 
ne trouvera ni jeux, ni aucun petit programme 
de pure application. Le classement proposé est 
par grand domaine (langages, tableurs, bases 
de données, etc..). 


LANGAGES 


FORTH (J. Cassady, Forth Age) plusieurs 
versions, avec assembleur et désassembleur, 
dont une qui tourne sur le PMS. 


Self-hosted Assembler (écrit en Basic par 
Peter Ernst, PPC VI2NS5). 


Désassembleur (lui aussi écrit en Basic, mais 
par Janick Taïillandier. Inédit). 


Noter que, pour utiliser ces logiciels, la 
possession des IDS du 75, et si possible du 
Manuel "HP 83/85 Assembler ROM" (HP 
00085-90444, en français), est très 
recommandée. 


Il y aurait un autre programme Assembleur, 
écrit par Michaël Hartmann et vendu en 
Allemagne. Je n’en sais malheureusement pas 
plus. 
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GENERATEURS D’APPLICATIONS 


PGENY75 (J. Walters, EduCALC #75589) Pour 
ceux qui ne veulent pas écrire du Basic : 
évalue des formules utilisant des noms 
symboliques à plusieurs caractères et crée un 
Basic approprié (génial pour calculer une 
formule du style "Salaire-brut = 
Taux-journalier * jours-de-présence" ; le 75 
demande "en clair" le taux et le nombre de 
jours, plusieurs fois...) 


BASES DE DONNEES et 
EXTENSIONS VISICALC 


File Management Applications (Richard 
Harvey, EduCALC #75312, version française 
aux Editions du Cagire). 


QUERY-75 (Megg Associates, EduCALC 
#75618 ou HP-Users'Library #V7504-75-2), 


VC7580 (Megg Associates, HP-Users’Library 
#V7541-75-8) permet les transferts directs de 
fichiers en format VisiCalc entre HP-75 et 
Série 80. 


VCMERGE (Richard Harvey, version française 
aux Editions du Cagire) permet de fusionner 
deux feuilles de travail résidant simultanément 
en RAM limitation de taille pouvant être 
levée en utilisant le Pod et les programmes 
VCCONSOL parus dans Micro Revue 
(décembre 86)). 


AGENDA (Pierre David, La Règle à Calcul) 


gestionnaire d'adresses très puissant, 
documenté en français. 

TRAITEMENTS DE TEXTES 

Take-A-Memo (Mann Associates) l’éditeur 


semble avoir disparu Dommage, c'était le 
seul logiciel qui savait créer complètement un 
formulaire, v compris dessin des filets, 
encadrés, zones grisées ou hachurées.. Deux 
versions, HP82905 et Thinkjet. 


Word Processor and Report Generator 
(Richard Harvey, EduCALC #75570). 
Nécessite la ROM I/O et VisiCalc, permet 
notamment d'inclure dans le texte des tableaux 
provenant de  VisiCalc (ce que le 
Text-Formatter ne savait, hélas, pas faire ! 
Tant mieux pour les devis !). 


AIDE A LA DECISION 


PERT-75 (Th. Brundage, 
#00093-75-3). 


HP-Users’Library 


CVS-75 (E. Gengoux, inédit) 
Désaisonnalisation de séries mensuelles et 
prévision à court terme par méthode de Box et 
Jenkins, utilise le ‘Pod’, le PMS ou les 
nouvelles EPROM 32K de CMT. Il comporte 
différents modules graphiques (7470, 
PacScreen, imprimante ligne, mini-plotter). 


ANACOMP analyse en composantes principales 
(Jean-Claude Liehn, Micro Revue. 


Communication  VisiCalc75 /  HPAF71. 
Utilitaires parus dans Micro Revue 
(Jean-Claude Liehn), et utilisant la boucle 
HPIL (permettent de passer des données au 
module CURVE-FITTNG du 71). 


Nombreux programmes  d’ajustement de 
courbes, régression linéaire simple ou multiple, 
etc., disponibles au catalogue de la 
Users’Library (voir notamment  #00112, 
#00137 et #00203). 


NAVIGATION 


NAVPAC-75 (Louis 
75647) 


Valier, EduCALC # 


GRAPHIQUES 


HP  Users’Library Solutions, adaptées à 
l'interface vidéo graphique PACSCREEN par 
Jean DUTERTRE (Micro-Revue). 


PLOTROM (Raan Young, HP Users’Library 
#03371-75-0) équivalent de la ROM 
Printer/Plotter du HP-85, s’utilise 
obligatoirement avec le PMS. 


PRPLOT75 (F. E: Brengman, HP 
Users’Library #03310-75-8) graphes sur 
Thinkjet. 


POLYPLOT (HP Lib #03463-75-5) Graphes 
de fonctions polynômes sur Thinkjet. 


PLOTIT-75 (Megg Associates, HP 
Users’Library #V7505-75-9),. 


UTILITAIRES 


Très nombreux utilitaires de gestion des 
supports, permettant un accès plus étendu aux 
données et fichiers. Nous ne pouvons pas tous 
les énumérer ; voici ceux qui nous paraissent 
les plus utiles : 


MASSUTIL  (VSoft, EduCALC  #75558) 
Enchaîneur de travaux en Basic, aide à la 
gestion des fichiers et supports. 


MASSLEX (VSoft, EduCALC #75-553) LEX 
permettant l’accès direct vrai aux données sur 
casette ou disquette (utilise un nouveau type 
de fichier "G", qui ne doit en aucun cas être 
chargé dans le 75 !). 


MADLEX (Jean-Yves Hervé, Micro Revue), 
un Lex bien français qui, lui aussi, permet 
l’accès direct (mais il utilise des fichiers Data 
de HP41, ce qui est exempt de danger!). A 
utiliser avec R4ILEX, du même auteur, qui 
décode les données en format "registre" (7 
octets), et doit aussi permettre une forme de 
communication 71/75 par fichier Sdata. 


DSPLEX (VSoft, EduCALC #75-552) étend 
les possibilités d’utilisation de l’écran vidéo 
(saisie par masque, adressage plus souple que 
par ESCAPE....). 


VIDEO et GESTV80 (Michel Martinet, La 
Règle à Calcul) éditeurs de texte plein écran 
sur les interfaces vidéo HP82163 et Mountain 
Computer. 


DEV7571 (EduCALC #75-7571) Outil de 
développement de programmes sur 71, par 
échanges avec un HP-75 via la boucle HPIL. 


LINK75 (Megg Associates, HP Users’Library 
#V7541-75-8) échanges de données entre le 
75 et un IBM-PC via la RS232 (entre 
VisiCalc75 et un fichier DIF, par exemple). 
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HP-LINK (carte HP82973A et son logiciel 
"driver", plus logiciel complémentaire 
HP82477), interface HPIL pour IBM-PC ou 
compatible, plus liaison HP75-PC ou HP71-PC 
(nettement mieux adaptée au 71 qu’au 75, il 
faut bien le dire !). 


LIFREADER (EduCALC #$S389) Transfert de 
fichiers vers disquette 5 pouces 1/4 (format 
IBM-PC), pour utilisation avec les lecteurs de 
disquettes Steinmetz SB10161A ou SB10162A. 


CASSETTE et ses variantes (Michel Martinet, 
Jean Dutertre, Jean Daniel Dodin et Eric 
Gengoux, in Micro Revue). La dernière 
version permet de saisir et modifier par 
secteur ou octet sur tout support de masse, y 
compris disquette. Idéal pour récupérer 
fichiers purgés, de type inconnu, et autres. 


XFERLEX (Roger Wiley, Datafile V4N3) pour 
transférer des fichiers par blocs entre supports 
de masse (remarquable pour réagencer un 
support sans "paniquer" le catalogue !). 


Sans oublier les différentes versions de PEEK 
et POKE, permettant ou non l'accès aux 
modules enfichables ou l’exécution directe (à 
vos risques et périls !) des routines du système, 
etc. En particulier PEEK*POKE (HP Lib. 
#00179-75-0), MEMLEX (VSoft, EduCALC 
#75-551), UTIL (J.Taillandier, comporte une 
fonction ADDR($)) et, enfin, PEEKROM 
(vous avez deviné !). 


Et voilà. Je crois avoir à peu près fait le tour 
de ce qui existe, et ne pas avoir oublié trop de 
choses. Tenez-moi au courant ; je répondrai 
aux demandes de renseignements et essaieraïi 
de poursuivre dans ces colonnes une 
"Chronique 75" aussi nourrie que possible. 
Avec la prochaine fois un “Guide de 
conversion 75->71" (et, des astuces, il y en 
a !). A bientôt donc. 


Eric Gengoux (108) 
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ASSEMBLEUR 


G. Toublanc 


BASIC 


X. Bille 
C. Bacquet 


X. Bille 
C. Bacquet 


LE COIN DES LHEX 


Combinaisons et arrangements 


Annuaire électronique 
Masses atomiques 


Programme "ARTMECA" 
Programme "COUCHATO" 


eee 


32 


35 
36 


37 
39 


41 
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PETITS ARRANGEMENTS, 
PETITES COMBINES..... 
UNE HISTOIRE QUI SE CORSE 


JPC 25 de juin 85 fût riche en Lex et en 
articles explicatifs à l’époque où les courageux 
s’attaquaient à l’assembleur de Titan. L’un des 
auteurs, Laurent Istria, nous initiait et créait 
deux mots Basic ARR et COMB, nous faisant 
entrer de plain-pied dans le domaine des 
fonctions mathématiques et des probabilités. 


En utilisant ces mots je m'aperçus que leur 
emploi est restrictif. En effet les arguments 
doivent être inférieurs à 1000, ce qui nous 
amène au paradoxe que Titan ne sait pas 
Calculer, par exemple : 


A 19002 = 1000*999 = 999000 
ou C900? = 2000*1999/2 = 1999000 


et est battu en brèche par le calcul mental, ce 
qui est un comble ! 


La raison de cela : l’utilisation de la routine 
interne FCSTRT qui calcule la factorielle d’un 
nombre - solution de facilité mais aussi, 
j'allais dire, de paresse. (ce n’est pas gentil 
envers quelqu'un qui osait travailler). 


Si 
A P=n!/t(n-p}! 
c'est aussi 
n(n-1)(n-2)......(n-p+1)(n-p)! / (n-p)! 
ou 
n(n-1)(n-2).....(n-p+1) 


ce qui est plus simple, plus rapide et sature 
moins vite les registres de Titan. En effet avec 
A 0007 = 1000! / 998! il y a overflow pour les 
calculs internes avec exposant de 5 chiffres ! 
D'où la restriction de Laurent Istria : n < 
1000. 


De même : 
C=n!/(n-p)! / p! 


mais aussi 
n(n-1)(n-2).…....(n-p+1)(n-p)! / (n-p)! / p! 
ou 
n(n-1)(n-2).....(n-p+1) / p! 
ou encore 
n(n-1)(n-2)....{(p+1)p! / (n-p)! / p! 
soit 
n(n-1)(n-2)......(p+1) / (n-p)! 


dernière formule que l’on prendra si n-p < p 
et enfin : 


CP=(n/ph(n-1 / p-1).....(n-p+1 / 1) 
formule réduisant les risques d’overflow. 
Il suffisait donc de programmer tout cela. 


Maintenant une question se pose : ces produits 
de nombreux facteurs sont-ils exacts ? (A 
cause des multiples troncatures à 15 chiffres). 
HP ne garantit l’exactitude des résultats par 
FCSTRT que pour n <= 253 , cette routine 
faisant d’ailleurs un ajustement pour n=137 et 
n=167. Alors dans ces conditions pour des 
arguments supérieurs à 253 les résultats de 
COMBARR (L. JIstria) ne peuvent être 
certifiés exacts jusqu’au 12ème chiffre. 


COMBARR deuxième jus fournit des résultats 
arrondis au plus près ou arrondis par défaut 
sur le 12ème chiffre. Si le résultat arrondi au 
plus près est : 


R = d,ddddddddddd*10P 
les résultats peuvent être R - 10P-11 et cela 
pour R > 104% ! donc pas très génant. Par 


exemple : 


A 34° = 84! = 3.31424013457E126 
et ARR(84,84) = 3.31424013456E126 


donc delta = -1E(126-11) = -1E115 
Rappel : 


ARR 
nombre d’arrangements de n éléments pris p à 
p 


syntaxe : ARR( n, p ) 
COMB 


nombre de combinaisons de n éléments pris p 
à P 


syntaxe : COMB( n, p ) 


n et p <1012 pour ces 2 mots 


Pour le reste, revoyez le très bon article de 
Laurent Istria (JPC 25 page 50). 





L’'ORGANIGRAMME DE COMBARR 


FARM |=----rssreue | |->--[Pi+1 = Pi*ni | 
| S0=0 | [nc | 
[entrée de ARR|-->-| | 
fees. | | | 
| Semen Vour [Jess 
*CMB* Y [calcul Cén,p}) ? >-->---]Ci+1=Pi+1/pi -1| 
Fe | | fees pese frsseesssesneses | 
| S0o = 1 | | |non | 
[entrée de COMB | | fnsrsmenn ne | | 
[ursssesens nee | | [Aï+1 = Pi+1| | 
| | press. | | 
O----<...| | 
*START* | O----------- <=. | 


| pope et teste | 
[2ème paramètre | 


| refuse p < 0 ,,| Jrsreesorvoscee | 
| non entier | | [=------guee ges | 
| et p >= 10°12 | | | arrondi à | 
[----........... | non /----------- \ oui | 12 digits | 
| [--------.-...... | -<--< pi+1 = 0? >---->---| résultat | 
[------- \ oui | AGn,p)=1 | Vraie / [AGn,p)  Cén,p)| 
Ip = 0 ? >------ >---| ou | |retour à basic | 
Fr | Cénp)=1 | |°----taerr ss | 
| Re | 
| | résultat et | 
Jess. | [retour à basic | 
| pope et teste | [-------........ | LE PROGRAMME 
| 1er paramètre | 
| dito 2e param. | 
[essscscomssss. | LEX ! COMBARR ! 
[= \ non [essssco... | ID #E1 
| n>=p >----- >---- Jinvalid arg| MSG 0 
RAS pre | POLL 0 
oui 
| AD2-15 EQU  #0C363 
[ess \ oui [ssosccs.s | ARGERR EQU #0BF19 
[n-p<p? >--->----- In-p->pl CLRFRC EQU  #O0C6F4 
[----- \ /----- / Joss... | DV2-15 EQU #O0C4AC 
[non | EXAB1 EQU  #0D3E7 
O----------. <=... | EXAB2 EQU  #O0D40E 
| FNRTN& EQU #0F238 
fr... | FUNCDO EQU  #2F8BB 
| initialise | MP2-15 EQU #0C43A 
|AO = CO = P1 =1| POPIR EQU #0E8FD 
| ni=n | RCCD1 EQU  #0D3F5 
|pi=p = compteur | RCCD2 EQU #0D41C 
[sauvegarde dans| RCLWT EQU  #0E981 
|scr. math stack| SPLITA EQU #0C6BF 
[------......... STAB1 EQU  #0D3D9 
| STAB2 EQU  #0D400 
Y STSCR EQU #O0E92C 
[-------- | SUBONE EQU #0C327 
| *LOOP* | TST15 EQU  #0D47A 
[= | URES12 EQU #0C994 
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AR 


CMB 


START 


C1 


P6é 


CONT 


ar 


ENTRY 
CHAR 
ENTRY 
CHAR 


KEY 
TOKEN 
KEY 
TOKEN 


ENDTXT 


NIBHEX 
ST=0 
GONC 


NIBHEX 
ST=1 


GOSUB 
GOSBVL 
?B=0 
GOYES 
D1=D1+ 
GOSUB 
GOSBVL 
GOSBVL 
P= 
GOSBVL 
GONC 
?2ST=0 
GOYES 
C=0 

p= 

C=P 
GOTO 
P= 
GOSBVL 
GOC 
GOTO 
?2ST=0 
GOYES 
C=C-1 
GOSBVL 
GOSBVL 
P= 
GOSBVL 
GONC 
GOSBVL 


ADOEX 
D0=(5) 
DATO=A 
A=0 
B=0 

Pp= 
B=B+1 
GOSBVL 


AR 
#F 
CMB 
#F 


ARR! 
20 
'COMB! 
21 


8822 
0 
START 


8822 
0 


POP 
STAB2 
bi 

C1 

16 
POP 
STAB1 
RCCD2 
2 
TST15 
P6 


AD2-15 
RCCD2 
1 
TST15 
ar 
EXAB2 


(FUNCDO) 
A 

W 

W 

14 

p 

STSCR 
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LOOP  GOSBVL 
GOSBVL 
GOSBVL 
GOSBVL 
?ST=0 
GOYES 
GOSBVL 

NODIV GOSBVL 
GOSBVL 
GOSBVL 
?B=0 
GOYES 
GOSBVL 
GOSBVL 
GOSBVL 
GOSBVL 
GOTO 


OUT GOSBVL 
DO=(5) 
C=DATO 
DO=C 
GOSBVL 

FNRTN  GOVLNG 

POP GOSBVL 
?A#0 
GOYES 
LCHEX 
?7A>C 
GOYES 
GOSBVL 
GOSBVL 
RTNC 


ERR GOVLNG 


END 


Maintenant 


RCLW1 
RCCD1 
MP2-15 
RCCD2 
0 
NODIV 
DV2-15 
STSCR 
EXAB2 
SUBONE 
Êl 

OUT 
EXAB2 
EXAB1 
SUBONE 
EXAB1 
LOOP 


RCLW1 
(FUNCDO) 
A 


URES 12 
FNRTN& 


POPIR 
S 

ERR 
011 

X 

ERR 
SPLITA 
CLRFRC 


ARGERR 


Es 


à vous les calculs de probabilité 


les plus fous. 


Guy Toublanc (276) 


Hs us FE RG PEL, 


L'ANNUAIRE ELECTRONIQUE 


Dans le module Forth (peut-être l’a-t-on 
oublié ?) se trouvent quelques fonctions Basic. 
Donc le point de départ était de les utiliser 
(toutes de préférence). De plus le programme 
devait avoir une certaine utilité. Non, non, ne 
passez pas la page : je m’efforcerai d'expliquer 
suffisamment la chose pour que vous puissiez 
l'adapter. 


Il s’agit d’un programme Basic assurant la 
gestion de répertoires téléphoniques, lesquels 
sont représentés par des fichiers Text. Tout y 
est : insertion, suppression, modification et 
enfin une recherche (dont je suis fier, tilt !) 
par champ laissant une grande souplesse à 
l'utilisateur. Par exemple, retrouver tous ceux 
dont le prénom commence par un C et le 
numéro par un 67. 


UTILISATION DU PROGRAMME 


[RUN] classique mais utile. Un message 
s'affiche "Commande:". Vous avez 3 secondes 
pour appuyer sur une touche. Puis l’attente se 
mue en un simple INPUT. La machine attend 
l’une des commandes que voici, l’exécute et en 
demande une autre. Toute commande invalide 
est signalée. 


[S] : pour stopper l’exécution du programme. 


[F] : Pour choisir un fichier répertoire. Tant 
qu’un fichier n’est pas ouvert, rien n’est 
possible (le programme se charge de 
l'indiquer). Au message "Fichier:", répondre 
par un nom (8 caractères) valide. Lorsque, 
plus tard, vous voudrez changer de fichier, 
utilisez la même commande. Le nom du 
répertoire courant sera rappelé. Si le fichier 
est ‘nouveau’, vous en confirmez la création. 


[I] : comme écriture, mais aussi comme 
insertion. Une seule commande fait toutes les 
écritures dans le fichier. Chaque fonction est 
repérée par un drapeau, ici c’est le 2 
Comment introduire une information ? Ce 
sous-programme est valable pour toutes les 
informations à entrer. Par INPUT : 


Nom : (20 caractères max.) 
Prénom : (20 caractères max.) 
Tél No: (8 chiffres) 


Ne vous échinez pas à compter 20 caractères : 
un délimiteur est prévu à cet effet. Entrer 3 
chaines vides équivaut à l'annulation de la 
commande ([I], [D], etc). La donnée étant 
introduite, la machine vérifiera que la même 
donnée  n’existe pas déjà On évite 
d’encombrer avec des copies de l’information. 


[D] : Pour supprimer une donnée du 
répertoire. Le drapeau 3 se lève. Introduire la 
donnée comme pour une recherche (voir la 
commande [R]) L'enregistrement concerné 
sera affiché. Au vu de l’écran, confirmer (ou 
non) la suppression. 


[M] : Initiale de modification. Drapeau 1. 
Scénario classique: introduction de la donnée 
comme pour une recherche (voir commande 
[R]). L'enregistrement concerné sera réinjecté 
dans le sous-programme  d’introduction 
d’information. Il suffit de modifier 
l'information au passage, selon son bon 
vouloir. 


[L] : Listage du répertoire. Drapeau d. 
Appuyer sur [CONT] pour poursuivre. Taper 
CONT OK pour cesser le listage. 


[R] : Recherche (mon chouchou !). Le drapeau 
O0 est attribué. Voyons sur un exemple, la 
recherche du numéro de téléphone de Gustave 
Lambert : 

Nom : LAMBERT [ENDLINE] 

Prénom : GUSTAVE [ENDLINE] 

Tél No : [ENDLINE] 


Le programme va afficher tous les 
enregistrements concernant la personne. 
Imaginons que son numéro est 42092378 
Alors celui-ci est affiché, ainsi que le nom et 
le prénom. À savoir : la machine sortira aussi 
le numéro de Lambertin Gustave (s’il existe). 
Une pression sur [v] donne le fruit suivant des 
recherches. Une pression sur une autre touche, 
vous répondez à une question. 

Un autre exemple, trouver tous ceux dont le 
prénom commence par C et le numéro de 
téléphone par 67 : 


Nom : [ENDLINE] 
Prénom : C [ENDLINE] 
Tél No : 67- - - [ENDLINE] 


Autre utilisation. Faire une modification sur le 
numéro de Julot grace à la commande [M]. Si 
Julot est unique dans le fichier, il suffit de 
remplir le champ Prénom JULOT 
[ENDLINE]. C’est tout. 
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LE PROGRAMME EN LUI-MEME 


Le plus simple et le plus agréable (pour les 
utilisateurs du programme) est la construction 
en "cascade". Ici, le principe est appliqué avec 
pas moins de 4 niveaux d’appel de 
sous-programmes. Cette mise en place de 
modules indépendants (à un même niveau du 
moins) facilite l’écriture du programme d’une 
part et la chasse aux bogues (40% de temps 
gagné) d'autre part. On fait tourner les 
modules séparément, les autres n’ayant qu’une 
seule instruction : RETURN 


Pour améliorer (ou adapter) ce programme, il 
faut commencer par établir le graphe 
hiérarchique (qui appelle qui, qui fait quoi). A 
partir de ce moment et dès l'instant où les 
variables sont connues, tout baigne. 


Vous n'avez pas le module Forth ? 
Commencez par ingurgiter l’utilisation des 
fichiers de données Text et dites-vous bien 
que votre cas n’est pas sans espoir. Voici 
quelques idées d'adaptation fonction par 
fonction. 


INSERTÉ# : pour ne pas se compliquer la vie, 
comme il n’y a pas d'ordre spécifique, plutôt 
que d'insérer avant le premier enregistrement, 
écrire à la fin du fichier : 

RESTORE #1,F @ PRINT #1:D$S 


REPLACE# : ça découle de la relativité des 
fichiers Text (voir un certain article sur les 


fichier de données.) :; se positionner à 
l'enregistrement voulu. le modifier en 
l’écrasant : 


RESTORE #1,E @ PRINT #1;D$ 


DELETE# : 2 choix. Soit échanger 
l'enregistrement à supprimer avec le dernier et 
diminuer la variable F=F-1 (il n’y aura plus 
d'accès au dernier). Soit recopier le fichier sur 
un autre, sauter l’enregistrement, continuer le 
recopiage. Le fichier de départ sera détruit et 
le fichier d’arrivée prendra le nom de celui de 
départ. 


FILESZR() le nombre d’enregistrements. 
Je ne vois pas d’autre moyen que de sacrifier 
le premier enregistrement du fichier à cet 
effet. 


SCROLL un DELAY INF (suivi d’un 
DELAY .5, après l'affichage, pour ne pas 
perturber les autres modules) est tout bon. 
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SEARCH) pourquoi ne pas écrire une 
fonction Basic qui fait la même chose. Les 
paramètres d'entrée sont : chaîne à chercher, 
numéro de colonne, ligne de départ, ligne de 
fin, canal. Le résultat est sous forme 
nnn.ccclil où nnn = numéro d’enregistrement, 
ccc = colonne à partir de laquelle la chaine se 
trouve, IIl = taille de l’enregistrement concerné 
(non utilisé ici) . 


Je vous fais confiance quant à l'algorithme. 
Voici quelques indications, manquant de 
précision peut-être. Dans la mesure où vous 
voudriez des indications supplémentaires, je 
suis généralement visible aux réunions. 


Amusez-vous bien quand même. 


Xavier Bille (203) 


COUCHES ELECTRONIQUES 
ET MASSES ATOMIQUES 


C’est la reprise du programme "nuage" (voir 
JPC 18) avec une modification importante à 
mes yeux. En effet, quel est le chimiste qui 


. Connaît par coeur les numéros atomiques des 


éléments ? Pour ma part je n’en connais pas. 


Passons au programme : vous introduisez zéro 


pour le numéro atomique (si vous ne le 
connaissez pas, bien sur) et le symbole 
chimique de l'élément. Il apparaîtra le symbole 
de l’élément, le numéro atomique (hé ! hé !), 
la masse atomique et, bien sûr, les couches 
électroniques. 


A bientôt 


Christian Bacquet (117) [ Ÿ 
Aù 


ds. 
ON 


ce 





Programme "ARTMECA!"! (Annuaire electronique ; necessite EDLEX : modules Text Editor ou Forth) … 


ASE 
a 


10 DESTROY ALL Q DISP "Agenda telephonique!" à LC OFF 
- * BILLE, 31/10/86 

* variables : 
N$ contient Le nom 
P$ contient le prénom 
T$ contient le numéro de teléphone 
NO$, PO$, TO$ substituts de N$,P$,T$ 
T, N, P longueur respectives de T$,N$,P$ 
H$ escape  0$ allume Le curseur 

S$ eteint le curseur 
L$ ramene Le curseur en début de Ligne 

X$ masque pour marquer 20 car max. 
Y$ masque pour N Tel 
K$ touche saisie 

* F$ nom de fichier 

* F quantité d'élément d'un fichier, G substitut de F 

* E index de repérage dans Le fichier 
30 DIM N$(20],P$[20],T$[(8],D$[50] 
* initialisation de variables 
40 HS=CHR$S(27) Q S$=H$E'<! Q O$=HSE'>! À LH=HSL! 180$ 
50 X$=S$S&' max'&L$ à Y$=! 1ESSECHRS(95)EOS À YS=YHEYHSEYHEYS LI ,418L$ 

- * boucle principale: on attend La commande 


Æ OOÙ Ù OÙ Ù  Ù  Ù  #  #  *#  * 


60 'A': ON TIMER #1,3 GOTO 80 à DISP ‘Commande: !: 
70 K$=KEY$ à IF K$<!'A! OR K$>!Z! THEN 70 ELSE DISP K$ 
- * après 3 sec on passe à un input 
80 OFF TIMER #1 @ IF K$='! THEN INPUT K$ 
90 IF NOT POS('SFDIRLM' ,UPRC$(K$)) THEN DISP K$&"?21 Q GOTO !'A'! 
- * commande S : stoppe 
100 IF K$='S! THEN ASSIGN #1 TO * à CFLAG ALL à END 
110 IF NOT (K$=!'F! OR FLAG(5)) THEN DISP “ouvrir un fichier SVP." à GOTO A! 
120 GOSUB K$ à CFLAG 0,1,2,3,4 à GOTO ‘A! 


- ** ouverture de fichier 


ee ot ue A RUE A AE MURS UE ME M ME MU NE ME A ARE UE AU UE AN US A de mue A ne (ue ee (me (Ou (A (ee (OU MU (ON (UN (UN UN UN NN UN AU de due MUe due due dune dune de ue me du me me 
0 UE CE CE UE CU AUS MURS EEE US Me die CS Ce une Cu Ce A Ce AN AN (EU MN (UN AN (UN UN MN NN MU UN MN AN AU UM AU du die eue dome ue nu eue mue ue ue (ee UN ŒuEN GUN Qu uns nu GR Œu Œ œmn ms 


130 'F': INPUT ‘'Fichier:',F$;:F$ Q G=FILESZR(F$) 

- * erreur 57 : file not found 

* G<0 pour une raison quelconque, on ne peut pas ouvrir Le fichier 

140 IF G<0 AND G#-57 THEN DISP MSG$(ABS(G)) à GOTO !F' 
150 IF G>=0 THEN 180 
160 INPUT Creation O/N:';R$ @ ON POS('ON' ,UPRC$(R$))+1 GOTO 160,170,'F: 
170 CREATE TEXT F$ à G=0 
180 ASSIGN #1 TO F$ à F=G @ SFLAG 5 @ RETURN 

- ** commande I : insertion 


190 ‘1': SFLAG 2 @ GOSUB 'RECH' 
200 IF FLAG(8) THEN DISP "existe deja." @Q RETURN 
210 GOSUB 'COD' à F=F+1 à IF F>1 THEN INSERT #1,0;D$ ELSE PRINT #1;:D$ 
220 RETURN 
- ** commande D : suppression 


230 'D': SFLAG 3 à GOSUB 'RECH'! 
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IF NOT FLAG(8) THEN DISP 'non trouve.! à RETURN 

GOSUB ‘AFF! @Q INPUT "confirmation O/N:":C$ 

IF UPRC$(C$)='0! THEN DELETE #1,E Q F=F-1 Q DISP "supprime." 
RETURN 

** commande M : modification 


1M': SFLAG 1 Q GOSUB 'RECH' 

* si l'enregistrement existe, on passe La main au s.p. ‘sai! pour modifier 
* flag(6) levé empeche les contenus de N$,7$,P$ 

IF FLAG(8) THEN SFLAG 6 à GOSUB 'SAI' ELSE DISP "non trouve." @ RETURN 

IF NOT FLAG(7,0) THEN GOSUB 'COD' à REPLACE #1,E:D$ 

RETURN 

** commande L : listage 


IL': SFLAG 4 @ RESTORE #1 
FOR E=0 TO F-1 à GOSUB 'DECOD' @ GOSUB 'AFF' @ PAUSE à NEXT E @ RETURN 
* pour faire cesser La fonction, cont ‘ok! 


10OK!': E=F à NEXT E @ RETURN 
** commande R : recherche 


IR': SFLAG O0 Q GOSUB ‘RECH' Q SFLAG 9 

IF NOT FLAG(8) THEN DISP 'Fin.!' à GOTO 410 

GOSUB ‘AFF! @Q SCROLL 1 @ GOSUB !'TRAN! 

* gestion des touches 

IF KEYDOWN('#51') THEN 400 ELSE DISP “suivant O/N ? !!: 

K$=KEY$S @ IF NOT (K$='N' EXOR K$='0!}) THEN 390 ELSE DISP K$ à 1F K$='N' THEN 410 
* on reprend La recherche la ligne suivant l'enregistrement proposé 
H=E+1 @ GOSUB 'RECH' à GOTO 360 

CFLAG 9 à RETURN 

** partie qui éxécute La recherche 

* mais aussi l'introduction de donnée, en fonction de La valeur flag(9) 


450 
460 


470 
480 
490 


IEC 


(RECH': IF NOT FLAG(9) THEN GOSUB !'SAI!' à H=0 

IF FLAG(7,0) THEN POP à RETURN 

* flag(10) jalon pour les tests de reconnaissance de chaines 

A$=N$ à SFLAG 10 à IF A$=!! THEN A$=CHR$(31)&P$ @ CFLAG 10 

* chr$(31) sépare nom et prénom 

* chr$(127) sépare prénom et n tel 

IF A$=CHR$(31) THEN A$S=CHR$S(127)8TS$ 

NO$S=N$S à PO$=P$ à TOS=TS 

* H sa valeur détermine à partir de quelle ligne La fonction search commence 
CFLAG 8 à Y=SEARCH(A$,1,H,F,1) @ IF NOT YŸ THEN GOSUB 'TRAN' à GOTO 530 
E=IP(Y) à GOSUB 'DECOD' à Y=IP(FP(Y)*1000) à IF Y>1 AND FLAG(10) THEN 520 
P=LEN(PO$) @ N=LEN(NO$) @ T=LEN(TO$) 

* test de reconnaissance en fonction des entrées et le contenu du fichier 

* si Les tests sont positifs flag(8) est levé 

IF (POS(NS[I1,N],N0$) OR NOT N) AND (POS(P$[1,P],P0$) OR NOT P) THEN SFLAG 8 ELSE 520 
IF FLAG(8) AND (POS(T$[1,171,10$) OR NOT T) THEN 530 

H=E+1 à GOTO 470 

CFLAG 10 @ RETURN 
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540 'SAI': IF NOT FLAG(6,0) THEN N$='! à T$=!! Q P$='! 
- * mise en place de masque grace à des car. de controle. 
550 INPUT Nom :!,H$&'%'&XS$S&NS: N0O$ à INPUT ‘Prenom :!,H$&!%!'&CHR$(28)&! '&XS&PS; POS 
560 INPUT 'Tel N !,Y$&T$:TO$ @ NO$=UPRCS(NO$[1,20]) @ PO$=UPRC$(PO$(1,20]) à TO$=T0$ [1,8] 
- * flag(7) levé si rien n'a été modifié Lors de l'introduction, par rapport à ce qui éxistait 
570 IF TO$=T$ AND PO0$=P$ AND NO$=N$ THEN SFLAG 7 ELSE GOSUB !TRAN' 
580 RETURN 
- ** on code Les informations pour qu'elles tiennent en 1 seule Ligne (car. 31 et 127) 


590 'COD': D$S=NSECHRS(31)8PHSECHRS(127)8T$ Q RETURN 
- ** jl faut bien entendu décoder l'information pour l'exploiter 


600 'DECOD': READ #1,E;D$ à@ N=POS(D$,CHR$(31)) à P=POS(D$,CHR$(127)) 

- * si un fichier texte est ouvert bien que non compatible, il faut Le noter 
610 IF NOT (P AND N) THEN DISP “Fichier incompatible. 
620 N$=D$[1,N-1] @ P$=D$[IN+1,P-1] Q T$=D$[P+1,P+8] @ RETURN 

- ** afficher de facon standard Les enregistrements 


630 'AFF': DISP ‘tel n '; à FOR 1=1 TO 7 STEP 2 à DISP T$[I1,1+1]8&CHR$(95*(1<7)); @ NEXT I 
640 DISP ! {nom} '&N$:' {prenom} '&P$ à RETURN 
- ** transfert entre substituts et variables principales 


650 :TRAN': N$=N0O$ à P$=PO$ Q T$=T0$ @ RETURN 


KKKKKKEKRERRERREREREREREREREREEERERERERRRRERRERRRRRRERERERERERARRRARRRRERERERERERERERERERÉÈRRRRRRER 


Programme "COUCHATO'" (determiner Les couches atomiques) 


- COUCHATO nécessite 1,6 Ko 
20 OPTION BASE 1 à DESTROY A,A$,E,N,P,2Z,2$ à STD à DIM C$(103)12],M$(103) [8] 
30 INPUT "Z= ou SYMBOLE ELEM=";7,2$ à Z=IP(Z) à A$='spdf! à FOR 1=1 TO 103 à READ C$(1) 
40 IF C$(1)=2$ THEN Z=I 
50 NEXT I @ READ M$() à DISP C$(Z);':1;1(Z=';Z;"MAt=";M$(Z);')!; 


60 1F Z=24 THEN Z=18 à GOSUB 200 à DISP '4s1 3d5' @ END ! CHROME 
70 IF Z=29 THEN Z=18 à GOSUB 200 à DISP '4s1 3d10' à END ! CUIVRE 
80 IF Z=41 THEN Z=36 Q GOSUB 200 à DISP '4d4& 5s1' @ END ! NOBIUM 
90 IF Z=43 THEN Z=36 à GOSUB 200 @ DISP '4d5 5s2! à END ! Tc 

100 IF Z=46 THEN Z=38 à GOSUB 200 à DISP '4d10 5s0! à END ! Pd 

110 IF Z=58 THEN Z=54 @Q GOSUB 200 à DISP '4f1 5d1 6s2! à END ! Ce 
120 IF Z=64 THEN Z=54 @ GOSUB 200 Q DISP '4f7 5d1 6s2! à END ! Gd 
130 IF Z=78 THEN Z=54 @ GOSUB 200 à DISP '4f14 5d9 6s1' à END ! Pt 
140 IF Z=79 THEN Z=54 @ GOSUB 200 à DISP ‘4f14 5d10 6s1! à END ! Au 
150 IF Z=91 THEN Z=86 Q GOSUB 200 à DISP ‘5f2 6d1 7s2' à END ! Pa 
160 1F Z=92 THEN Z=86 à GOSUB 200 à DISP '5f3 6d1 7s2' à END ! U 
170 IF 2=93 THEN Z=86 à GOSUB 200 à DISP !'5f4 6d1 7s2! à END ! Np 
180 IF Z=96 THEN Z=86 Q GOSUB 200 à DISP '5f7 6d1 7s2! à END ! Cm 


190 GOSUB 200 à END 

200 FOR E=1 TO 13 Q FOR N=IP(E/2)+1 TO E 

210 P=2+4*(E-N) @ IF A+P>Z THEN P=Z-A 

220 A=A+P @ DISP ;STR$S(N);ASLE-N+1,E-N+1] :STR$(P)&!,'; @ IF A=Z THEN RETURN 
230 NEXT N à NEXT E 
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240 DATA H,He,Li,Be,B,C,N,0,F,Ne,Na,Mg,Al,Si,P,S,CL,Ar,K,Ca,Sc,Ti,V,Cr,Mn,Fe,Co,Ni,Cu,Zn,Ga, Ge 
250 DATA AS,Se,Br,Kr,Rb,Sr,Y,2r,Nb,Mo,Tc,Ru,Rh,Pd,Ag,Cd,In,Sn,Sb,Te,1,Xe,Cs,Ba,La,Ce,Pr,Nd,Pm 
260 DATA Sm,Eu,Gd,Tb,Dy,Ho,Er,Tm,Yb,Lu,Hf,Ta,W,Re,Os,Ir,Pt,Au,Hg,TL,Pb,Bi,Po,At,Rn,Fr,Ra,Ac,Th 
270 DATA Pa,U,Np,Pu,Am,Cm,Bk,Cf,Es,Fm,Md,No,ir 

280 DATA 1.00797,4.0026,6.939,9.0122,10.811,12.01115,14.0067,15.9994,18.9984, 20.183, 22.9898 
290 DATA 24.512,26.9815,28.086,30.9738,32.064,35.453,39.948,39.102,40.08,44.956,47.90,90.50,942 
300 DATA 31.996,54.938,55.847,58.933,58.71,63.54,65.37,69.72,72.59,74.922,78.96,79.909,83.80 
310 DATA 85.47,87.62,88.905,91.22,92.906,95.94,98,101.07,102.905,106.4,107.87,112.4,114.82 

320 DATA 118.69,121.75,127.60,126.904,131.30,132.905,137.34,138.91,140.12,140.907, 144.24 ,147 
330 DATA 150.35,151.96,157.25,158.924,162.50,164.930,167.26,168.934,173.04,174.97,178.49 

340 DATA 180.948,183.85,186.2,190.2,192.2,195.09,196.967,200.59,204.37,207.19,208.980,210,210 
350 DATA 222,223,226,227,232.038,231,238.03,237,242,243,247,247,249,254,253,256,254 ,257 
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LE COIN DES LHEX 


Comme de coutume, cette rubrique contient la liste des codes hexadécimaux des 
fichiers Lex parus ce mois-ci. 


assembleur, qui apporte de nouvelles fonctions. Celles-ci sont utilisables directement, 
ou dans des programmes Basic. 


Pour bénéficier de ces nouvelles fonctions, vous n'avez pas besoin de programmer 
vous-même en assembleur, ni de posséder un module Forth/Assembleur. 


Il suffit de recopier le petit programme basic "MAKELEX" ci-dessous, de le lancer 
et de recopier les codes du fichier Lex désiré. Quand vous avez fini, les nouvelles 
fonctions sont accessibles, après avoir éteint et rallumé votre HP71. 


Si l'erreur "Erreur de somme" apparaît, vérifiez la ligne que vous avez introduite. 


Rappelons ce qu'est un fichier Lex : c’est un programme pour le HP71], en 
| 


P. David (37) 


COMBARR ARR 225020 COMB 225021 
10 CALL MLEX @ SUB MLEX à SFLAG -1 à PURGE AH à INPUT "Nb. d'octets: !";N à LC OFF 
20 CREATE DATA AH,1,N-4 à A=HTD(ADDRS('"AH!")) à B=A à GOSUB 130 
30 Q=1 à X=0 à INPUT "000: ",P$;:A$ à C$=A$ à S=0 à GOSUB 90 
40 Q=2 à X=1 à GOSUB 80 à A$=AS$SE&C$S à A=A+37 àQ N=N*2+37 àQ Q=3 Q SFLAG 5 @ FOR X=2 TO N DIV 16-1 
50 GOSUB 80 à C$=C$[5*FLAG(5)+1] à POKE DTH$(A),C$ à A=A+16-5*FLAG(5,0) @ NEXT X à Q=4 
60 DISP DTH$S(X)[3]1: à INPUT ": ",P$[1,MOD(N,16)]1;C$ à GOSUB 90 
70 POKE DTH$(A),C$ à POKE DTH$(B),A$ à CFLAG -1 à END 
80 DISP DTH$(X)[3];: à INPUT ": ",P$;C$ 
90 DISP DTH$(X)[3]1; @ INPUT " sm ","---":D$ 
100 M=S @ FOR Z=1 TO LEN(CS) @ M=NUM(CS[Z])+M+1 @ NEXT Z 
110 IF D$=DTH$(MOD(M,4096))13] THEN GOSUB 130 à S=M @ RETURN 
120 DISP "Erreur de somme" à BEEP à P$=C$ à POP à ON Q GOTO 30,40,50,60 
130 P$=t---mmooomooosee " @ RETURN 
// COMBARR ID#E1 208 octets 008: 4D09798217F78018 E65 014: EO8FE04D08F723C0 A4B 
009: F9D3D08FC14D0228 215 015: 979228FE04D08F7E DFD 
0123456789ABCDEF sm O0A: FA74D0541860FO0AF 5C0 016: 3D08F723C08F7E3D 1B2 
00B: 22180CE68D0268FA 95E 017: O61AF8F189E01BBB 56C 
000: 34F4D42414252502 364 00C: 74D046066F086062 CCF 018: 8F21461348F499C0 8F6 
001: 802E002381811078 6BA 00D: A4E8F363C08FC14D 090 019: 8D832FO08FDF8E094 CB7 
002: 5A1001E415100000 A02 O0E: 0218FA74D0S908FE 432 0O1A: CD1321109B6318FF 04F 
003: F020000000000000 D2A 00F: 04D01321BBB8F214 7BC 01B: B6CO8F4F6C04008D 3FB 
004: 0A2000F90082000F 096 010: OAFOAF12EB058FC2 B7C 01C: 91FB0 522 
005: 514252541734F4D4 403 011: 9E08F189E08F5F3D F3F 
006: 24511FF882284059 77A 012: O8FA34C08FC14D08 2EA 
007: 0882285078118F00 AE4 013: 60908FCA4CO8FC29 69E 
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ENGLISH SUMMARY 
JPC 41 - FEBRUARY 1987 


This issue is very important for us. We are now using new formatting tools which allow us to use 
proportional character fonts as well as mix fonts in a line. As in the past, alt is done on an HP-71 
+ 2 HP9114., We hope you will enjoy this new style. 


Obviously, a large part of this issue is devoted to the new HP scientific calculator : the HP-28C. 
We are also starting a new column , devoted to the HP-75C. We expect it will be a regular one. 


About the articles : 


On page 4, you will find a review of the HP-28C, written by Pierre David. He covers, with many 
examples, the most important features of this calculator. His conclusions are very positive : he 
thinks the price / performance ratio is excellent and symbolic calculus is a major progress ; on the 
negative side : the lack of memory and missing features in symbolic calculus. 


Then, we have a translation of a paper by W. Wickes, presenting the history of the developpement 
and explaining the general philosophy behind the design (page 13). 


HP-41 is represented by a game on page 24. 


The article on the HP-75 presents us all software Eric Gengoux knows about for this computer 
from various sources (page 28). 


The only Lex for the HP-71, this month, is a new version of COMBAR initially published in JPC 
25. The problem with the original version was the call to FCSTRT. This yields to restrictions of 
the original. Now, you can compute COMB(n,p) and ARR(n,p) with n, p < 102 (see page 32). 
The first Basic program provides an efficient address directory. It is "key-driven" and provides an 
efficient search function on any field or part of a field. EDLEX from HP is required to run it 
(page 35). 

The last program gives you the atomic mass and orbital representation of all (known) atoms (page 
36). 


If you have any comment or suggestion about this Summary, please write to us. 


Until next month, Happy Programming. 
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